Select Code to Download

my $filename;
if (defined(my $fileno = fileno($fh))) {
...
      $filename = undef unless -e $filename;
   }
}