Select Code to Download

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

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