void call_it() {
    ......
    SV* re = POPs;
    Perl_sv_dump(my_perl,re);
    ......
}