-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Anthony Gardner wrote:
> Can s.o. explain what is wrong with the following code
> ....
>
> $r->pnotes('KEY' => push( @{ $ar }, $some_val ) );
>
> because, when it comes to getting the value from
> pnotes later with .... $r->pnotes(KEY), it returns the
> number of elements in the array and not the array ref.
push returns the number of array's elements. And this gets stored in the
'KEY' of pnotes. Nothing wrong here.
> I've had to write ......
>
> my $ar = $r->pnotes('KEY') || [];
> push( @{ $ar }, $debug_str );
> $r->pnotes( 'KEY' => $ar );
http://perl.apache.org/docs/2.0/api/Apache2/RequestUtil.html#C_pnotes_
$old_val = $r->pnotes($key => $val);
$val = $r->pnotes($key);
$hash_ref = $r->pnotes();
So
push @{ $r->pnotes()->{'KEY'} }
should do what you want.
The abofe doc is for mod_perl2, but as far as I see, the same applies
for mod_perl 1 as well.
dam
- --
Damyan Ivanov 0x9725F63B Creditreform Bulgaria
[EMAIL PROTECTED] http://www.creditreform.bg/
phone: +359(2)928-2611, 929-3993 fax: +359(2)920-0994
mob. +359(88)856-6067 ICQ 3028500 [EMAIL PROTECTED]/Gaim
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.1 (GNU/Linux)
Comment: Using GnuPG with Thunderbird - http://enigmail.mozdev.org
iD8DBQFDKqBlHqjlqpcl9jsRAtFaAJ4zrkS2BCirN8s5jQYWjOGVi4o0SwCgnT/l
rtNpyRgQIYpZdP3T97Bo5u8=
=rvA/
-----END PGP SIGNATURE-----
