FIND模塊，找到的文件為啥返回不了啊

tanxin8651

在/tmp 下有文件 /tmp/beijing/key.name, /tmp/beijing01/key.name01

#!/usr/bin/perl use File::find; my $path="/tmp"; find (\&wanted,$path); print "@file"; sub wanted{ if($File::Find::name=~/key/ and $File::Find::name=~/beijing/) push @file,$File::Find::name; }

我是想把通過(guò)FIND模塊找到的路徑賦值給一個(gè)數(shù)組,然后返回,再打印出來(lái).換成 "print $File::Find::name\n"就可以打印

這樣為啥返回不了文件全路徑呢。
返回值:/tmp/beijing/key.name /tmp/beijing01/key.name01

[ 本帖最后由 tanxin8651 于 2009-3-29 23:04 編輯 ]

小公貓

那你返回的是什么？

wxlfh

把數(shù)組@files定義在調(diào)用find函數(shù)之前。