Select Code to Download

 
perl -d:Trace -e " eval q{  use open qw/ :std :encoding(utf8) /; use T
+est::Exception; }; warn $@ "   2>2

...


perl -e "  use open qw/ :std :encoding(UTF-8) /; use Test::Exception; 
+"

Encode                 2.47
Encode::Alias          2.16
Encode::Config         2.05
...
vars                   1.02
warnings               1.12
warnings::register     1.02

Encode                 2.43
Encode::Alias          2.14
Encode::Config         2.05
...
vars                   1.01
warnings               1.09
warnings::register     1.01

$ set PERL_ENCODE_DEBUG=999

...
vars                   1.02
warnings               1.12
warnings::register     1.02