void callback(){
    int a = 10;
    int b = 20;
    dSP;
    ENTER;
    SAVETMPS;
    PUSHMARK(SP);
    XPUSHs(sv_2mortal(newSViv(a)));
    XPUSHs(sv_2mortal(newSViv(b)));
    PUTBACK;

    call_pv("p_callback", G_DISCARD|G_NOARGS);

    SPAGAIN;

    printf("%d to the %dth power is %d.\n", a, b, POPi);

    PUTBACK;
    FREETMPS;
    LEAVE;
}

##</code><code>##

in init
in perl callback
Use of uninitialized value in subroutine entry at c_extern_call_perl.pl line 11.
10 to the 20th power is -474476032.
Segmentation fault