perl 语言如何获得目录下的所有文件的文件名？要求可以在任何平台移植！！！
1个回答
展开全部
opendir(DIR,'d:/www');
while(my $file = readdir(DIR)){
print $file,"\n";
}
closedir(DIR);
while(my $file = readdir(DIR)){
print $file,"\n";
}
closedir(DIR);
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
