$ftpfind->finddepth (\&wanted, "/namethatdoesnotexist");
sub wanted {
 print "hello";
 print $_;
}