Yeah, thta's cheeky. I totally overlooked what push
was returning.
I'll remember for next time.
Cheers all.
--- Damyan Ivanov <[EMAIL PROTECTED]> wrote:
> -----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-----
>
___________________________________________________________
To help you stay safe and secure online, we've developed the all new Yahoo!
Security Centre. http://uk.security.yahoo.com
