NAME
Apache2::SafePnotes - a safer replacement for Apache2::RequestUtil::pnotes
SYNOPSIS
use Apache2::SafePnotes;
DESCRIPTION
This module cures a problem with Apache2::RequestUtil::pnotes
. This function stores perl variables making them accessible from various phases of the Apache request cycle.
Unfortunately, the function does not copy a passed variable but only increments its reference counter and saves a reference.
Thus, the following situation could lead to unexpected results:
my $v=1;
$r->pnotes( 'v'=>$v );
$v++;
my $x=$r->pnotes('v');
I'd expect $x
to be 1
after that code snipped but it turns out to be 2
. The same goes for the tied hash interface:
my $v=1;
$r->pnotes->{v}=$v;
$v++;
my $x=$r->pnotes->{v};
Even now $x
is 2
.
With Apache2::SafePnotes
the problem goes away and $x
will be 1
in both cases.
EXPORT
None.
SEE ALSO
modperl2, Apache2::RequestUtil
AUTHOR
Torsten Foertsch, <torsten.foertsch@gmx.net>
COPYRIGHT AND LICENSE
Copyright (C) 2006 by Torsten Foertsch
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.