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

Question

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

这是片段

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); 

请帮我解决这个问题。

谢谢

Answer 1

您可以使用 file test ，例如

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