如何测试Perl中是否存在与模式匹配的文件?

前端之家收集整理的这篇文章主要介绍了如何测试Perl中是否存在与模式匹配的文件?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我可以在Perl中这样做吗?含义模式匹配文件名,并检查是否存在.
if(-e "*.file")
    {
      #Do something
    }

我知道要求系统列出文件的更长的解决方案;将其作为文件读取,然后推断文件是否存在.

解决方法

您可以使用 glob返回与该模式匹配的所有文件的数组:
@files = glob("*.file");

foreach (@files) {
    # do something
}

如果您只想知道是否存在与该模式匹配的文件,则可以跳过该作业:

if (glob("*.file")) {
    # At least one file matches "*.file"
}

猜你在找的Perl相关文章