thv = (HV*)sv_2mortal((SV*)newHV());
sv = newSViv((IV)info);
sv_magic((SV*)thv, sv, '~', "CTlib", 5);
SvRMAGICAL_on((SV*)thv);

rv = newRV((SV*)thv);
stash = gv_stashpv("Sybase::CTlib::_attribs", TRUE);
(void)sv_bless(rv, stash);