sub client_start { my $self = shift; # this is an overwritten method!!! my ($kernel, $heap, $session) = @_[ KERNEL, HEAP, SESSION ]; # child code goes here # [...] # now, access the overwritten parent method $self -> SUPER::client_start( @_ ); }