Perl获取目录下文件或者包含子目录下文件

diezhuzhen5707

于 2015-08-13 00:44:00 发布

阅读量1.1k

点赞数

原文链接：http://www.cnblogs.com/CodeTracker/p/4725995.html

版权

这篇博客介绍了如何使用Perl编程语言来获取指定目录下包括子目录内的所有文件。通过示例代码，读者可以学习到Perl在文件操作方面的功能。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

 1 my $dir = "D:\\My_Work\\Temp";
 2 my @files = ();
 3 
 4 #获取给定目录下文件
 5 @files = get_dir_files($dir);    
 6 
 7 #获取给定目录以及子目录下文件
 8 @files = get_dir_files_x($dir);
 9 
10 #获取目录下以及子目录下文件，返回的结果中包含路径
11 sub get_dir_files_x{
12     my ($dir_p) = @_;
13     my

最低0.47元/天解锁文章