print $fh;

##</code><code>##

print {$fh} $_;
print $fh $_;