Very Computer

Here's a problem that probably takes a simple answer. Something I've
overlooked.  I want to pass logging information to a perl script.

I have:

TransferLog "| /usr/local/etc/httpd/cgi-bin/script.cgi"

and:

#! /usr/local/bin/perl

open (FILE, ">>/usr/local/bin/logs/file");

        print FILE;

Quote:}

exit 0;

What I get is "Document Contains No Data" from the Browser and
"Lost connection with machine.com" in the error_log.

Any suggestions?

It all works fine if I just change TransferLog to:
TransferLog /usr/local/etc/httpd/logs/file

instead of having the pipe but I want to operate on the log info
on the fly with Perl.

Thanks.

David Geller

Erm... the script is not started once for each log entry, and it is
not passed the information on the command line.

An example script:

#!/usr/local/bin/perl

open (FILE, ">>/tmp/log.out");
while (<>) {
        print FILE "GOT: $_";

Quote:}

Note that you probably won't see anything in the file until either
a bunch of requests have gone by or you kill or restart the server
because of perl's buffering.  Also note that the program runs as root,
so you need to be very careful what you do.  Doing something silly like
what the above sample does (ie. writing to a world writable directory)
is a gaping security hole that gives easy root in most cases.

My apologies, I'm using Apache 1.2.0.