Updated!

Try to look at my modules from 'Date' DateTime Project. Maybe it will be useful for you :-))

      
--------------------------------
SV* sv_bless(SV* sv, HV* stash);