PRINT($out, "TEXT");

##</code><code>##

tied(*$out)->PRINT("TEXT");