PerlIO *		T_INOUT
