Log-Log4perl
view release on metacpan or search on metacpan
lib/Log/Log4perl/Appender/File.pm view on Meta::CPAN
if(defined $self->{group}) {
$gid = $self->{group};
if($self->{group} !~ /^\d+$/) {
$gid = getgrnam($self->{group});
die "Unknown group: $self->{group}" unless defined $gid;
}
}
if($uid != $uid_org or $gid != $gid_org) {
chown($uid, $gid, $self->{filename}) or
die "chown('$uid', '$gid') on '$self->{filename}' failed: $!";
}
}
##################################################
sub file_switch {
##################################################
my($self, $new_filename) = @_;
print "Switching file from $self->{filename} to $new_filename\n" if
_INTERNAL_DEBUG;
lib/Log/Log4perl/FAQ.pm view on Meta::CPAN
where the logfile gets recreated, e.g. during log rotation.
If Log::Log4perl is used by a web server application (e.g. in a CGI script
or mod_perl), then the webserver's user (usually C<nobody> or C<www>)
must have the permissions mentioned above.
To prepare your web server to use log4perl, we'd recommend:
webserver:~$ su -
webserver:~# mkdir /var/log/cgiapps
webserver:~# chown nobody:root /var/log/cgiapps/
webserver:~# chown nobody:root -R /var/log/cgiapps/
webserver:~# chmod 02755 -R /var/log/cgiapps/
Then set your /etc/log4perl.conf file to include:
log4perl.appender.FileAppndr1.filename =
/var/log/cgiapps/<app-name>.log
=head2 How can my file appender deal with disappearing log files?
The file appender that comes with Log4perl, L<Log::Log4perl::Appender::File>,
( run in 0.331 second using v1.01-cache-2.11-cpan-5511b514fd6 )