use Inline C => <<'__EOS__';

void force_ordinary_string(SV *sv) {
   SvPV_force(sv);
}

__EOS__

force_ordinary_string($$buf);