[MacPerl] File::Find not working on Mac ?

["Georges Martin" <georges.martin@deboeck.be>]

I'm trying this (very simple) code :

        use File::Find;

        find (\&process, 'MyDisk:aFolder:');

        sub process {
                print "$dir\t$_\t$name\n";
        }

it returns $_ but nothing in $dir nor $name. 

I'm using MacPerl 5.0.7r1m. Does anybody has a clue or a better suggestion for
a +portable+ directory recursion solution ?

=8-) Georges Martin

-- 
+-----------------------------------------------------------------------+
 Georges Martin                       <mailto:georges.martin@deboeck.be>
+-----------------------------------------------------------------------+
 Groupe De Boeck s.a.                              phone +32 10 48.25.72
 Fond Jean Paques 4                                  fax +32 10 48.25.19
 B-1348 Louvain-la-Neuve (Belgium)                   
+-----------------------------------------------------------------------+