Select Code to Download

open FH, '>', 'filename' or die $!;

die $! unless open FH, '>', 'filename';

    open(FOO,$foo) || die "Can't open $foo: $!";

    die "Can't open $foo: $!" unless open(FOO,$foo);