rb_io_t *fptr;

Check_Type(f, T_FILE);
rb_io_binmode(f);
GetOpenFile(f, fptr);
rb_io_check_writable(fptr);
fprintf(rb_io_stdio_file(fptr), pstr);

--
It doesn't work, thanks.