#include #include #include #include static PerlInterpreter *my_perl; int main(void) { char *var; my_perl = perl_alloc(); perl_construct(my_perl); var = SvPV_nolen(get_sv("MyConfig::var", TRUE)); printf(">%s<\n", var); return(EXIT_SUCCESS); }