use utf8; binmode STDOUT, ':encoding(UTF-8)'; print "Séan\n"