Как я могу угадать кодировку строки в Perl?

У меня есть строка Unicode и я не знаю, какова ее кодировка. Когда эта строка читается программой Perl, существует ли кодировка по умолчанию, которую будет использовать Perl? Если так, как я могу узнать, что это?

Я пытаюсь избавиться от не-ASCII символов от ввода. Я нашел это на каком-то форуме, который сделает это:

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

Как будет работать вышеуказанное, если не указана входная кодировка? Должно ли оно быть указано следующим образом?

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