Re: [squid-users] Script Check

mån 2009-08-10 klockan 23:28 -0400 skrev michel_at_casa.co.cu:

> This Script could be in Perl?

Yes, or any language you prefer.

Something like the following should do fine, leaving it to you to define
find_user_from_ip as suitable for your environment.

#!/usr/bin/perl -an
use URI::Escape;
BEGIN { $|=1; }

$user = find_user_from_ip($F[0]);
if ($user) {
   print "OK login=".uri_escape($user)."\n";
} else {
   print "ERR\n";
}

Regards
Henrik
Received on Fri Aug 14 2009 - 22:06:06 MDT