Re: [squid-users] Authentication Hack

Thanks, Mick.

On Wed, Mar 5, 2008 at 12:08 PM, Michael Graham wrote:
> (Sorry Dave I keep hitting reply and not reply to list)
Yes, I keep doing that :)

> External helps are not supposed to exit once they have completed a
> request. Your perl script should read from stdin then write OK/ERR then
> wait for more input.
Ah!

So this should work?

 1:#!/usr/bin/perl
 2:while(1){
 3: $| = 1;
 4: $ip=<STDIN>;
 5: $ip=chomp($ip);
 6: $ipfile='/var/www/apache2-default/cgi-bin/ips/'.$ip;
 7: #print $ipfile;
 8: if (-e $ipfile){print "OK";}
 9: else {print "ERR : ".$ip;}
10:}

I'll try it right now.
Received on Wed Mar 05 2008 - 03:19:02 MST