Help for this page
open(FILE1, "<file1"); open(FILE2, "<file2") or die "Can't open file2: $!\n";
use Fatal qw(open); eval { open(FILE1, "<file1"); } open(FILE2, "<file2");