diff --git a/agc_2-X/trunk/experimental/FastAGI_log_multi_server.pl b/agc_2-X/trunk/experimental/FastAGI_log_multi_server.pl index 73f9fe71..cf6a0a0f 100644 --- a/agc_2-X/trunk/experimental/FastAGI_log_multi_server.pl +++ b/agc_2-X/trunk/experimental/FastAGI_log_multi_server.pl @@ -155,6 +155,8 @@ use Net::Server::PreFork; # any personality will do sub process_request { + my $self = shift; + $process = 'begin'; $script = 'VDfastAGI'; ########## Get current time, parse configs, get logging preferences ########## @@ -251,6 +253,8 @@ sub process_request { { $agi_string = "+++++++++++++++++ FastAGI Start ++++++++++++++++++++++++++++++++++++++++"; &agi_output; + $agi_string = "Connection accepted from $ast_server_ip"; + &agi_output; }