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

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

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