use File::Find ();

$File::Find::dont_use_nlink=1; # I found a post here that said something about setting this if you intend to run it on DOS, and I did as I may want to run it on Win95/98 as well

# I'm looking for "eudora.ini" on my system and I want it to search from the root of C: (and it definitely exists on my system)

File::Find::find( {wanted => \&wanted}, 'C:/' ) || die "Can't search for file: $" ;

sub wanted {
    /^eudora\.ini\z/s;
}

print ($File::Find::name);