¿Cómo puedo adivinar la codificación de una cadena en Perl?

Tengo una cadena Unicode y no sé cuál es su codificación. Cuando un programa de Perl lee esta cadena, ¿existe una codificación predeterminada que Perl utilizará? Si es así, ¿cómo puedo averiguar qué es?

Estoy tratando de deshacerme de los caracteres no ASCII de la entrada. Encontré esto en algún foro que lo hará:

my $line = encode('ascii', normalize('KD', $myutf), sub {$_[0] = ''});

¿Cómo funcionará lo anterior cuando no se especifica una codificación de entrada? ¿Debe especificarse como el siguiente?

my $line = encode('ascii', normalize('KD', decode($myutf, 'input-encoding'), sub {$_[0] = ''});

Respuestas a la pregunta(3)

Su respuesta a la pregunta