Select Code to Download

#!/usr/bin/perl

...
SV* mkstr() {
    return newSVpv("This is another string!", 0);
}

#!/usr/bin/perl

...

    return av_make(size, pint);    
}

#!/usr/bin/perl

...

    return hash;    
}

#!/usr/bin/perl

...
    
    return sv_bless(rv, gv_stashpv("MyClass", GV_ADD));    
}