wchar_t * T_PV ... INPUT T_PV $var = ($type)SvPV_nolen($arg) ... OUTPUT T_PV sv_setpv((SV*)$arg, $var);