auto decRefCount by PerlT scope