view release on metacpan or  search on metacpan

lib/Apache2/Instrument.pm  view on Meta::CPAN

modify it under the same terms as Perl itself. See L<perlartistic>.

=cut

our $VERSION = '0.03';

use Apache2::Const -compile => qw(OK);
use Apache2::RequestUtil ();
use Apache2::RequestRec  ();
use Apache2::Log         ();
use Data::Dumper;

sub notes {
    my ( $class, $r, $v ) = @_;
    if ( defined $v ) {
        return $r->pnotes( $class, $v );
    }
    else {
        return $r->pnotes( $class ) || {};
    }
}