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