perl IO-stringy