open my $fh, '<', $filename or die "Unable to open [$filename] because of: $!"; #### open my $fh, '<', $filename or die "Unable to open [$filename] because of: $! $^E";