$0 - working okay - no logging command received - use ?debugme query string for more info.

Once this script works to your satisfaction, edit this file (at $0) and turn debugging off by setting \$AllowDebug = 0;. Read the trouble-shooting guide if you need more help.

Standard Debugging Information:

This is AXS Logging Module version $VERSION in debug mode.
The file name of this script is $0.
This script is executing under Perl version $].
The critical file system variable is \$LogFile = "$LogFile";. EOM if ($MaxLogSize) { print "MaxLogSize has been initialized to $MaxLogSize bytes."; } else { print 'MaxLogSize is not set.'; } print <<"EOM";

Filesystem Test:

EOM TEST: { if (-e $LogFile) { ($LogSize,$LastModT) = (stat($LogFile))[7,9]; $LastModT = scalar localtime($LastModT); print "

The log file, $LogFile, exists with size $LogSize bytes. It was last modified at $LastModT. "; if (open(FILE,">>$LogFile")) { binmode(FILE); close(FILE); print "The log file is writable. The filesystem test passed!

"; } else { print <<"EOM"; However, the log file is not writable. The filesystem returned "$!" when this script tried to write to it. You need to change the file permissions to make it script writable. The filesystem test failed.

EOM last TEST; } } elsif (open(FILE,">>$LogFile")) { binmode(FILE); close(FILE); print <<"EOM";

The log file, $LogFile, did not exist when this script started. However, this script attempted to create it for you, and the server responded that this was successful. So everything should be fine now. Reload this web page, and hopefully you'll see a message that the file system test has passed. If it doesn't pass, and instead you get an error or you get this message again, then you'll have to manually create the log file and set it's permissions. The filesystem test needs to be run again.

EOM last TEST; } else { print <<"EOM";

The log file, $LogFile, doesn't exist. You need to create one and give it writable permissions. Alternately, the log file may exist but the \$LogFile variable might not point to the correct location, in which case you will need to change your variable. The filesystem test failed.

EOM last TEST; } print <<"EOM";

Usage Instructions:

These instructions apply only if your file system test passed.

Code your off-site links like this:

\t<A HREF="$ENV{'SCRIPT_NAME'}?http://yahoo.com/">http://yahoo.com/</A>

If you are using server-side includes (SSI), cut and paste the following tag into all of your pages. You might have to name the pages with a .shtml or .stm extension in order for this to work:

\t<!--#exec cgi="$ENV{'SCRIPT_NAME'}" -->

Otherwise, if you are not using SSI, choose one of the two image redirect methods. The first one, below, doesn't log the referring URL. It works on all browsers that display images (and most of them do). To use it, cut and paste the following code into all of your pages:

\t<IMG SRC="$ENV{'SCRIPT_NAME'}?trans.gif" HEIGHT="1" WIDTH="1">

The other image redirect method, below, works on JavaScript- and image-enabled browsers. It logs the referring URL. To use it, cut and paste the following code into all of your pages:

\t<SCRIPT LANGUAGE="JavaScript">
\t<!--
\t\tdocument.write("<IMG SRC=\\"$ENV{'SCRIPT_NAME'}?trans.gif&ref=");
\t\tdocument.write(document.referrer);
\t\tdocument.write("\\" HEIGHT=1 WIDTH=1>");
\t// -->
\t</SCRIPT>

The debugger doesn't know whether SSI will work on this particular web server. You need to experiment. Use SSI if you can, otherwise choose an image method.

EOM } # End of block TEST print '

Environment Variables:

';
foreach (sort keys %ENV) {
	print "$_: $ENV{$_}\n";
	}
print <<'FOOT';

Visit the AXS help page for more information. AXS is copyright 1997-2001 by Fluid Dynamics.