Apache2::Log

Apache2::Log is a Perl API for Apache Logging Methods.
Download

Apache2::Log Ranking & Summary

Advertisement

  • Rating:
  • License:
  • The Apache License 2.0
  • Price:
  • FREE
  • Publisher Name:
  • mod_perl Team
  • Publisher web site:
  • http://search.cpan.org/~pgollucci/mod_perl-2.0.3/docs/api/Apache2/Log.pod

Apache2::Log Tags


Apache2::Log Description

Apache2::Log is a Perl API for Apache Logging Methods. Apache2::Log is a Perl API for Apache logging methods.Synopsis # in startup.pl #-------------- use Apache2::Log; use Apache2::Const -compile => qw(OK :log); use APR::Const -compile => qw(:error SUCCESS); my $s = Apache2::ServerUtil->server; $s->log_error("server: log_error"); $s->log_serror(__FILE__, __LINE__, Apache2::Const::LOG_ERR, APR::Const::SUCCESS, "log_serror logging at err level"); $s->log_serror(Apache2::Log::LOG_MARK, Apache2::Const::LOG_DEBUG, APR::Const::ENOTIME, "debug print"); Apache2::ServerRec->log_error("routine warning"); Apache2::ServerRec::warn("routine warning"); # in a handler #------------- package Foo; use strict; use warnings FATAL => 'all'; use Apache2::Log; use Apache2::Const -compile => qw(OK :log); use APR::Const -compile => qw(:error SUCCESS); sub handler { my $r = shift; $r->log_error("request: log_error"); my $rlog = $r->log; for my $level qw(emerg alert crit error warn notice info debug) { no strict 'refs'; $rlog->$level($package, "request: $level log level"); } # can use server methods as well my $s = $r->server; $s->log_error("server: log_error"); $r->log_rerror(Apache2::Log::LOG_MARK, Apache2::Const::LOG_DEBUG, APR::Const::ENOTIME, "in debug"); $s->log_serror(Apache2::Log::LOG_MARK, Apache2::Const::LOG_INFO, APR::Const::SUCCESS, "server info"); $s->log_serror(Apache2::Log::LOG_MARK, Apache2::Const::LOG_ERR, APR::Const::ENOTIME, "fatal error"); $r->log_reason("fatal error"); $r->warn('routine request warning'); $s->warn('routine server warning'); return Apache2::Const::OK; } 1; # in a registry script # httpd.conf: PerlOptions +GlobalRequest use Apache2::ServerRec qw(warn); # override warn locally print "Content-type: text/plainnn"; warn "my warning";Requirements:· Perl Requirements: · Perl


Apache2::Log Related Software

About SoftwareSea