perl 里如何把一个文件夹里的文件递归抽取出来？

milk_

一个文件夹里有子文件夹和其他文件
我想把这个文件夹里的文件递归抽取出来，perl 有没有现成的包和函数可以调用？

如果自己写，有没有判断该文件是 单个文件 还是 目录  的函数？

请指教

qqhelloWorld

处理文件夹下的所有文件，包括子文件夹，find会找出每个文件，然后调用doIt方法进行处理

use File::Find;
sub doIt{
   过滤想要的文件；
   处理文件；
}

find(\&doIt,$path)

[ 本帖最后由 qqhelloWorld 于 2006-3-10 15:06 编辑 ]

milk_

原帖由 qqhelloWorld 于 2006-3-10 15:05 发表
处理文件夹下的所有文件，包括子文件夹，find会找出每个文件，然后调用doIt方法进行处理

use File::Find;
sub doIt{
   过滤想要的文件；
   处理文件；
}

find(\&doIt,$path)

哪里有perl API的文档下载啊？

Strange

perldoc 的 moduels就是查这些东西的。
或者直接去cpan。

ulmer

原帖由 milk_ 于 2006-3-10 15:16 发表
哪里有perl API的文档下载啊？

Many people asked those question where I can dig gold.
Gold is just under your foot!
Under your command line (Windummy's CMD-Window / *nix's Xterm or terminal)
just simply type perldoc
perldoc perl
perldoc -f find
perldoc -q file
perldoc File::Find

You will became a rich man! ;-)

Best, ulmer