perl中通过文件操作符glob提供相当于shell中的指定多个文件的“通配符”语法功能,文件操作符glob将返回与所指定的glob文件模式相匹配的所有文件的list。
glob的用法--读取一个目录下的所有文件
1. 比如要读取/home/globtest目录中的所有文件,可以这样写:@plFiles = glob '/home/globtest/*.*';
上面的glob的用法相当于如下
opendir(Dir,"/home/globtest");#注意这是在Linux的写法,若在Windows下,应该写为opendir(Dir,"F:\\home\\globtest");
@Files=readdir(Dir);
closedir(Dir);
foreach $Cur(@Files){
$File="/home/globtest".$Cur;
open(IN,$File);
while(<IN>){
......
}
close(IN);
}
————————————————
版权声明:本文为CSDN博主「feliciafay」的原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/feliciafay/article/details/6871835