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