if (SvROK ((SV *) mine->ptr->init)) { type = SvTYPE(SvRV((SV *)mine->ptr->init)); printf ("Something ..%d", type); }