open(OUTFILE, '> myfilename.txt');
print "This goes to the screen\n";
open(STDOUT, '>&OUTFILE'); #dup STDOUT to OUTFILE
print "This goes to the file\n";