use open qw' :std :encoding(UTF-8) '; use open qw' IO :encoding(UTF-8) ';