use APR::PerlIO ();