SV* my_sv = newSViv(12345);
XPUSHs(sv_2mortal(my_sv));