close STDOUT; open(STDOUT, "> test.STDOUT") or die $!; print "blah"