使用 perl 的 TokeParser 更改目录答案

【问题标题】：Changing directory with perl's TokeParser使用 perl 的 TokeParser 更改目录
【发布时间】：2012-11-07 01:30:40
【问题描述】：

如何更改 TokeParser 在打开文件进行解析时显示的目录（例如，在 $htmlFileName 之前添加目录）？

my $p = HTML::TokeParser->new($htmlFileName);

【问题讨论】：

标签： html perl parsing web-crawler

【解决方案1】：

在 Perl 中更改目录：

chdir($dir);

perldoc 说：

chdir EXPR
chdir FILEHANDLE
chdir DIRHANDLE
chdir   Changes the working directory to EXPR, if possible.  If EXPR is omitted, changes to the directory specified by $ENV{HOME}, if set; if not, changes to the directory specified by
        $ENV{LOGDIR}.  (Under VMS, the variable $ENV{SYS$LOGIN} is also checked, and used if it is set.)  If neither is set, "chdir" does nothing.  It returns true on success, false
        otherwise.  See the example under "die".

            On systems that support fchdir(2), you may pass a filehandle or directory handle as the argument.  On systems that don't support fchdir(2), passing handles raises an exception.

注意

另一种解决方案是将完整路径放入$htmlFileName

【讨论】：

【解决方案2】：

my $p = HTML::TokeParser->new("/foo/bar/$htmlFileName")
    or die $!;

【讨论】：