open $filehandle, (@ARGV == 1 ? '>' : ()), @ARGV;