Hi Guys
Suppose I do something like this:
void make_struct{HV* hash_ref} { hv_store(hash_ref, "key",3, newRV_noinc((SV*)arr_ref = newAV()), 0); av_store(arr_ref, 1, newRV_noinc((SV*)hash2_ref = newHV())); hv_store(hash2_ref, "test", 4, 33); }
And then in perl if I did this:
my %testhash = (); make_struct(\%testhash); print $testhash{key}[1]{test}
And this would print 33 right?
Thanks ! Nitin