sub foo($bar) { ... } #### sub foo($); sub foo { my ($bar) = @_; ... } #### sub foo($$); # sub foo($self, $bar) {...}