What I mean is:

open FH, ">", ( $ARGV[0]  || die "...");
[download]

Of course this is not a solution, because this does not check errors from open function but it works fine for me.