Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/perl/10.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Perl 检查目录中是否存在两个文件_Perl - Fatal编程技术网

Perl 检查目录中是否存在两个文件

Perl 检查目录中是否存在两个文件,perl,Perl,我想检查目录中是否存在文件A或B。 应告知用户是否:, 一个或两个文件都存在 我发现可以使用perl中的glob函数来完成: if ( glob("*.file") ) { # At least one file matches "*.file" } 通常,您将返回值glob分配给列表,然后使用该列表的大小: my @files = glob '*.file' print 'found ' . @files . " files\n"; 请更详细地说明您正在尝试执行的操作以及显示的代码

我想检查目录中是否存在文件A或B。 应告知用户是否:, 一个或两个文件都存在

我发现可以使用perl中的glob函数来完成:

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

通常,您将返回值
glob
分配给列表,然后使用该列表的大小:

my @files = glob '*.file'
print 'found ' . @files . " files\n";

请更详细地说明您正在尝试执行的操作以及显示的代码的方式是不够的。请参阅@zwol中的文件测试操作符,代码可以工作,但我需要存在的文件的文件名。@Yash您说过要检查文件A是否存在,然后您知道名称是“A”?抱歉,问题现在已经解决。谢谢