Perl 语言获得目录下的所有文件的文件名

2019年6月13日 310次阅读来源: Waste_Land

opendir(DIR,’c:/’);
while(my $file = readdir(DIR)){
print $file,”\n”;
}
closedir(DIR)

    原文作者：Waste_Land
    原文地址: https://www.jianshu.com/p/0f36ad3e2edd
    本文转自网络文章，转载此文章仅为分享知识，如有侵权，请联系博主进行删除。