Question

考虑以下代码：

    $ENV{HTTP_proxy} = $proxy_url;
    my $ff = File::Fetch->new(uri => "http://xxxxx.htm");
    my $where = $ff->fetch();
    my $file = $ff->file;
    my $error=$ff->error();
    delete $ENV{HTTP_proxy};
    $jira->attach_file_to_issue($src_issue, $file);
    print "URL: $file attached to $src_issue key \n .......................\n";
    unlink $file;

我想从远程系统获取并附加.htm文件。我正在使用File::Fetch CPAN模块。我无法附加文件：

错误：无法统计tmpfile'C：/ Users / jira123 / Desktop / New文件夹/ Linking_scripts / FW：L2_PM_on_11qpe24.htm-8584'：C：/ strawberry / perl / vendor / lib /中没有这样的文件或目录LWP / UserAgent.pm第922行。

如何附加.htm文件？

Answer 1

在您的代码 $ where 是本地存储文件的名称，该文件具有从给定URL获取的内容（提供的获取成功）。本地文件（$ where）存储在当前工作目录（即从中启动脚本的目录）中。因此，附加文件的代码应如下所示：

$jira->attach_file_to_issue($src_issue,$where);

您指定 $ file 作为附件，并根据模块File::Fetch的文档， $ file 对应于远程文件的名称。

如何在Perl中获取和附加.htm文件？

1 个答案: