Select Code to Download

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