sub legacy_method { my ($self, @args) = @_; return $self->current_method(@_); }