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': $!";