Help for this page

Select Code to Download


  1. or download this
        /* Extract the object hash and the output filehandle. */
    SV* obj_sv     = ST(0);
...
    PerlIO* out_fh = (PerlIO*)SvRV(out_fh_ref);

    err = PerlIO_write( out_fh, buf_start, buf_len );
  2. or download this
        PerlIO* fh = IoOFP( sv_2io(out_fh_ref) );