sub blah { my $foo = shift; my $bar = shift; my $baz = shift; }