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