Select Code to Download

const char script[] = 
"Here is my big script with function 'exec_it()'";
...
static PerlInterpreter *my_perl;
my_perl = perl_alloc();
perl_construct(my_perl);

perl_call_pv("exec_it", G_DISCARD);