如何在Perl中的目录中循环文件？ [重复]

发布时间：2020-12-15 21:17:16 所属栏目：大数据来源：网络整理

导读：Possible Duplicate: 07000 我想循环遍历同一目录中包含的几百个文件。我如何在Perl中执行此操作？解决方法 #!/usr/bin/perl -w@files = *;foreach $file (@files) { print $file . "n";} 哪里 @files = *; 可 @files = /var/www/htdocs/*; @files = /var/

Possible Duplicate:
07000

我想循环遍历同一目录中包含的几百个文件。我如何在Perl中执行此操作？

解决方法

#!/usr/bin/perl -w

@files = <*>;
foreach $file (@files) {
  print $file . "n";
}

哪里

@files = <*>;

可

@files = </var/www/htdocs/*>;
 @files = </var/www/htdocs/*.html>;

等等

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!