die "$file not found\n" unless ( -e $file );

open( FH0, $file ) or die "Unable to open $file: $!\n";
...