Select Code to Download

load_module(PERL_LOADMOD_NOIMPORT,
            newSVpvn("My::Module", 10),
            newSVnv(0.01));

char *theArgv[] = { "", "/dev/null" };
perl_parse(my_perl, xs_init, 2, theArgv, (char **) NULL);