sub foo{
   my $self = shift;
   # bewegliche Argumente verbleiben in @_
}