If your Perl is up to date, then make sure you do one of the following:
Convert a string into Unicode:
$ustring = pack "U0C*", unpack "C*", $ustring;
Open a file in Unicode:
open( FILE, "<:utf8", $fname );
Switch existing descriptor into Unicode format after it was already open:
binmode DATA, ":utf8";