my $self = shift;
my $class = ref($self) || $self;