treat $self as SoccerPlayer;
# do lots of soccer playery things with $self
$self->shoot;

##</code><code>##

sub reload
{
  $self->gunslingerimplementer->reload($self)
}

##</code><code>##

sub reload($parent)
{
  my $bullets = $parent->pockets->getbullets(6);
  $parent->gun->load($bullets);
}