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