package Class::myIrgendwas;
use strict;
use warnings;
use parent 'Class::Irgendwas';

sub method
{
  my $self=shift;
  return $self->Super::method(@_) if(@_==1);

  my $val1=shift;
  my $val2=shift;

  # ...

  return #...
}