open my $fIn1, '<', $filename or die "Failed to open '$filename': $!\n";

##</code><code>##

eval {
    Grab($filename);
    return 1;
} or do {
    my $err = $@;

    return if $err =~ /File not found/;
    die $err;
};