WWW::MechanizeのUTF8
#!/usr/bin/perl -w use strict; use WWW::Mechanize; my $mech = WWW::Mechanize->new(); $mech->agent_alias('Windows IE 6'); my $start = "http://127.0.0.1/test.html"; # UTF8のコンテンツ $mech->get($start);
これだけで
Parsing of undecoded UTF-8 will give garbage when decoding entities at /usr/lib/perl5/site_perl/5.8.5/LWP/Protocol.pm line 114.
Parsing of undecoded UTF-8 will give garbage when decoding entities at /usr/lib/perl5/site_perl/5.8.5/cygwin-thread-multi-64int/HTML/PullParser.pm line 83.
Parsing of undecoded UTF-8 will give garbage when decoding entities at /usr/lib/perl5/site_perl/5.8.5/cygwin-thread-multi-64int/HTML/PullParser.pm line 83.
Parsing of undecoded UTF-8 will give garbage when decoding entities at /usr/lib/perl5/site_perl/5.8.5/cygwin-thread-multi-64int/HTML/PullParser.pm line 83.
こんなエラーになる。とりあえずperl本体とライブラリを最新化してみよう。