note
kwoff
A hash is something like an array. Say you have
<CODE>
%foo = (
'bar' => 'baz',
'qux' => 'quux',
);
</CODE>
Then do <CODE>register(%foo)</CODE>, and now the
@_ variable inside register might be like this:
<CODE>
$_[0] = 'bar';
$_[1] = 'baz';
$_[2] = 'qux';
$_[3] = 'quux';
</CODE>
<P>
It's almost like you called it with
<CODE>register('bar' => 'baz', 'qux' => 'quux')</CODE>.
And remember that <CODE>=></CODE> is just a comma operator
which quotes the left argument, so that's like doing:
<CODE>register('bar', 'baz', 'qux', 'quux')</CODE>.
</P>
<P>
Note how my assignment to %foo above is like assigning
a list ('bar' => 'baz', 'qux' => 'quux') to %foo.
So, what happened when you did
<CODE>
my (%error, %FORM) = @_;
</CODE>
is the elements of array @_ were assigned to %error,
where %error gobbles up all the list passed to it
because it doesn't know where to stop.
</P>
130834
130834