Subject: | Faulty return value from param({...}) |
Hi Folks
At CGI::App V 4.50 line 473:
if (scalar(@data) <= 2) {
my $param = $data[0];
return $rp->{$param};
}
This code does not call ref on $data[0], so after a call like
$app -> param({one => 1}), the value is set properly, but the hashref
itself is used as a hash key in $rp->{$param}.