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