in reply to [SOLVED] encoding trouble

You might try this:

use utf8;
use open IO => ':encoding(UTF-8)', ':std';

[download]

Please see also Encoding horridness revisited: What's going on here? [SOLVED]. To be honest: I repressed some/most of the ugly details. Credits go to choroba and 1nickt.

Best regards, Karl

«The Crux of the Biscuit is the Apostrophe»

perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'Help

In Section Seekers of Perl Wisdom