perl - 未定義の値HTML::TokeParser

Question

Perlスクリプトを使用してHTML内のタグを見つけようとしています。

 use WWW::Mechanize::Firefox;
 use Crypt::SSLeay;
 use HTML::TokeParser;
 $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME}=0;

 my $mech = WWW::Mechanize::Firefox->new;
 $mech->get_local('salida2.html');
 my @links = $mech->links();
 print @links;


 my $parser = HTML::TokeParser->new('salida2.html') || die $!;
 my $tag = $parser->get_tag('ul');

このエラーが発生します。C：\ Users \ me \ Documents \ Scripts \parsing.pl9行目の未定義の値でメソッド「get_tag」を呼び出せません。

salida2.htmlはスクリプトと同じディレクトリにあり、WWW :: Mechanize :: Firefoxインスタンスでも使用しており、正常に動作しています。

前もって感謝します。

Answer 1

手がかりはあなたが得るエラーにあります。ファイルはスクリプトと同じディレクトリにある可能性がありますが、それが作業ディレクトリであるとは限りません。正しいディレクトリに移動するかchdir、完全修飾パスを使用してください...