Select Code to Download

package xmlutil;
use XML::Simple;
...
    $parm_str = "\$" . "config->{jane}->{tel_no}, "\n";
    print "ref3 = ", $$parm_str, "\n";
}

void get_ival( int *int_p, char *parm_str_p )
{
...
    FREETMPS;
    LEAVE;
}