sub foobar { my $self = shift; my $param = shift; }