Function PerlIO_get_ptr 

pub unsafe fn PerlIO_get_ptr(
    my_perl: *mut PerlInterpreter,
    a: *mut PerlIO,
) -> *mut c_char

PerlIO_get_ptr [THX] - macro function