my $filename = shift; return unless(defined $filename && $filename ne '');