open FILE,$file || die "Cant open $file!\n"; #### open (FILE,$file) || die "Cant open $file: $!\n"; #### open FILE,$file or die "Cant open $file: $!\n"; #### open (my $fh, '<', $file) || die "Cannot open $file: $!";
## open (FILE,$file) || die "Cant open $file: $!\n"; ##
## open FILE,$file or die "Cant open $file: $!\n"; ##
## open (my $fh, '<', $file) || die "Cannot open $file: $!";