遍历当前目录代码,Perl代码库,德仔网

代码语言

代码分类

【Perl】遍历当前目录

作者:ulwvfje / 发布于2014/8/12/ 368


	my $path = `pwd`;
	chomp $path; # `pwd`命令结尾有个回车符，需要chomp去掉
	print "$path\n ";
	opendir DIR ,$path || die "cant open $!";
	foreach my $file (readdir DIR) { # readdir 将读出所有的文件和目录，包括.和..
	 print "$file\n ";
	 }

评论列表

本站所提供的代码，版权归原作者所有，若有侵犯作者版权，请与我们联系，我们将立即删除或修改。谢谢!
本站所有代码发布及提供者。

　　

试试其它关键字

　遍历当前目录　　遍历　　当前目录　

同语言下

可能有用的

ulwvfje贡献的其它代码(2)