请教大家在Perl中怎么获得一个文件夹下的所有的文件名啊？

zhouhaiming

1^# zhouhaiming 发表于 2007-09-20 16:24

如题，谢谢！

milkharbor

2^# milkharbor 发表于 2007-09-20 16:25

glob"* .*"

ulmer

3^# ulmer 发表于 2007-09-20 16:53

see perldoc opendir, readdir, closedir:
perl -le '$dir="."; opendir D, $dir; print join "\n", readdir D; closedir D;'

ubac

4^# ubac 发表于 2007-09-21 14:29

http://bbs.chinaunix.net/viewthread.php?tid=907555&extra=page%3D2%26amp%3Bfilter%3Ddigest