use strict; if (@ARGV) { use Unicode::UTF8simple; my $uref = new Unicode::UTF8simple; my $utf8string=$uref->fromUTF8("iso-8859-1",@ARGV); my $string=$uref->toUTF8("iso-8859-1",$utf8string); print "I give you: $string\n"; }