PerlInterpreter *my_perl; 
#allocate memory for my_perl, construct my_perl, system initialization 
... 
perl_parse(my_perl, xs_init, argc, args, loc_environ);