Can't figure out find()

[Meije Oppenhuizen]

I am probably doing something very wrong here, but can someone tell me
why

#!/usr/bin/perl -w

use File::Find;

print "$arg";
open(LISTFILE, "> /home/meyeo/testfile") or die "Can't open the ffin
thingy!";
print LISTFILE "\n";
close(LISTFILE);

find (\&wanted, $arg);

sub wanted
{
#  this should print all the files in the serving directory (including
subdirs)!
open(LISTFILE, ">> /home/meyeo/testfile") or die "Can't open the ffin
thingy!";
print LISTFILE "$_\n";
close(LISTFILE);
}

does list all the files when i do 'listfiles /myhomedir' (including
subdirs)
and lists only the dirnames when i do 'listfiles /cdrom'?


--
----------------------------------------------------------------
| Meije Oppenhuizen    | Non-smoker since  0 years,  7 months, |
| Utrecht, Netherlands | 26 days,  1 hours and 50 minutes      |
----------------------------------------------------------------