if (! open my $fh, '<', $file){
    die $!;
}

# file handle already closed if you try to access here