open(my $lfh, $log) or die "Could not open file 'log' $!";
####
open(my $lfh, $log) or die "Could not open log file '$log': $!";
####
open(my $lfh, '<', $log) or die "Could not open log file '$log': $!";
####
open my $lfh, '<', $log or die "Could not open log file '$log': $!";