Perl LWP::Simple::getstore 如何检查文件是不是存在于目标目录中

Posted 2023-03-29

【中文标题】Perl LWP::Simple::getstore 如何检查文件是不是存在于目标目录中

【英文标题】：Perl LWP::Simple::getstore How to check if the file exists in destination directoryPerl LWP::Simple::getstore 如何检查文件是否存在于目标目录中

【发布时间】：2011-08-19 08:35:59

【问题描述】：

在我的 Perl 脚本中，我使用 LWP::Simple::getstore 检索图像并存储为文件。但是在存储之前如何检查那个文件是否已经存在呢？

这是sn-p

use constant FILE_DIR => "/home/destination/files/";
my $image_path = FILE_FOLDER."$item_id"."_"."$file_date.$image";
my $res = LWP::Simple::getstore($image_url,$image_path); 

请帮帮我。

谢谢

【问题讨论】：

FILE_DIR 和 FILE_FOLDER?这听起来令人困惑。

【参考方案1】：

您可以使用file test，例如

unless (-e $image_path) 
    LWP::Simple::getstore($image_url, $image_path);