この警告が表示されます (「use diagnostics;」の後);
/usr/lib/perl5/HTML/PullParser.pm 81 行目でエンティティをデコードするときに、デコードされていない UTF-8 を解析するとガベージが生成されます。
私のプログラムは次のようなものです:
...
use diagnostics;
use WWW::Mechanize;
use WWW::Mechanize::Gzip;
...
$m = WWW::Mechanize::GZip->new(
agent => $self->{_agent},
timeout => $self->{_timeout},
);
if (!$m->get($url)) {
die("Impossibile scaricare l'url [$url]");
}
if (!$m->form_number(1)) {
die("Impossibile trovare il form 1");
}
<WARNING IS EMITTED HERE>
...
どうすればそれを取り除くことができますか? それとも無視しても大丈夫ですか?
更新: WWW::Mechanize::GZip->new() の代わりに WWW::Mechanize->new() を使用すると、静かに動作することを知っているだけです...だから、問題は GZip モジュールから来ています...?