sub run { my $self = shift; $self->SomeSub(); }