my ($foo, $bar, $baz); # oops, forgot " = @_" my ($foo, $bar, $baz) = shift; # oops, used shift() instead of "@_" my $single_arg = @_; # oops, will usually be 1