sub perl5foo { my ($bar, $baz) = @_; }