未定义的值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.pl第9行的未定义值上调用方法“get_tag”。

salida2.html与脚本位于同一目录下，我也将它与WWW :: Mechanize :: Firefox实例一起使用，并且工作正常。

提前谢谢。

Answer 1

线索是你得到的错误。该文件可能与您的脚本位于同一目录中，但这并不意味着这是您的工作目录！ chdir到正确的目录或使用完全限定的路径...