Log Handler Example
Every request phase can be controlled using mod_perl. Here's an example of a PerlLogHandler. The PerlLogHandler is one of the last phases of the request cycle.
PerlLogHandler
This example sends mail when a request is made to the /private section of your web space. A more common use of a PerlLogHandler might be to track hits on a specific set of URLs, or to write logging data to a relational database.
file:My/Notify.pm ------------------------ package My::Notify; use strict; use Apache::Constants qw(:common); use Mail::Send; sub handler { my $r = shift; my $email = $r->server->server_admin || return DECLINED; my $mail = Mail::Send->new( To => $email, Subject => "mod_perl Notification", ); my $file = $r->filename; my $fh = $mail->open; $fh->print("File '$file' was accessed"); $fh->close; return DECLINED; # let apache write to the lot } 1; # modules must return true
The httpd.conf setup:
<Location /private> SetHandler perl-script PerlLogHandler My::Notify </Location>
To install DocSet, copy and paste the appropriate command in to your terminal.
cpanm
cpanm DocSet
CPAN shell
perl -MCPAN -e shell install DocSet
For more information on module installation, please visit the detailed CPAN module installation guide.