Help for this page

Select Code to Download


  1. or download this
    TYPEMAP
const char * T_PV
...
  ANY OBJECT
   $var = ($type) SvIV((SV*)SvRV($arg));
  2. or download this
    XS(XS_Test_TestMethod)
{
...
        char*   CLASS = (char *)SvPV(ST(0),PL_na);
        pstruct *  param1;
  3. or download this
    XS(XS_Test_TestMethod)
{
...
        char*    CLASS = (char *)SvPV_nolen(ST(0));
        pstruct *  param1 = (pstruct *) SvIV((SV*)SvRV(ST(1)));