my $directory = 'e:\logs';
my $temp = -d $directory ? find ({wanted => \&wanted,bydepth =>0}, $directory) : undef;

##</code><code>##

if (-d $directory) {
  # find...
} else {
  # do some error processing stuff
}