or download this
# Files (change input encoding to match file encoding):
open my $F, "<:encoding(UTF-8)", "myfile" or die "Error reading myfile
+: $!";
...
# Or, command-line args is an appropriate use of Encode::Locale
use Encode::Locale;
my $arg = decode("locale", $ARGV[0]);