my ($error, $next_arg)=@_; # Grab multiple items at once my $error2 = $_[0]; # Access the item you want my $error3 = shift; # Shift it off the argument list