foo(1,2,3); sub foo { my ($x,$y,$z,@sorted,$stdev) = @_; # ... }