Select Code to Download

    use utf8;

        use open qw( :encoding(utf8) );
        binmode STDIN,  qw{ :encoding(UTF-8) };
        binmode STDOUT, qw{ :encoding(UTF-8) };
        binmode STDERR, qw{ :encoding(UTF-8) };

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