find(\&wanted,  @directories);
      find(\%options, @directories);

##</code><code>##

my $file='foo';        
my directory='a';                                                                                   
sub check_existance {                                                                              
    if ( -e $_ && $_ eq $file ) {                                                                      
        print "Found file '$_' in directory '$File::Find::dir'\n";                                     
    }                                                                                                  
}       

find( \&check_existance, $directory );