open(OUTPUT, '>-') or die;
print OUTPUT "foo\n";

##</code><code>##

open(OUTPUT, ">", '-')
print "foo\n";