Help for this page

Select Code to Download


  1. or download this
           Newx(buf, somesize+1, char);
           /* ... fill in buf ... */
           buf[somesize] = '\0';
           sv_usepvn_flags(sv, buf, somesize, SV_SMAGIC | SV_HAS_TRAILING_
    +NUL);
           /* buf now belongs to perl, don't release it */