package t::Object::Morbid::Sub; use strict; use warnings; use Carp; use base 't::Object::Morbid'; use Object::LocalVars; give_methods our $self; 1;