> do decode(*value);
What is this?
> $req->{$fields{$pairs[0]}} = $value;
must be
$req->{fields}{$pairs[0]} = $value;
and this
>while(($key, $value) = each($req->{%fields})) {
must be
while(($key, $value) = each(%{$req->{fields}})) {
Gerald
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
