redirector

#!/usr/bin/perl
$0 = 'redirect' ;
$| = 1 ;

@banners = ('reklama\.ru/cgi-bin/banner/',
            'anekdot\.ru/cgi-bin/banner/',
            ..................
            'linux\.ru\.net/counter\.ph',
            'counter\.allhits\.ru/counter?'
);

while (<>) {
   ($url, $who, $ident, $method) = /^(\S+) (\S+) (\S+) (\S+)$/ ;
   $url = 'http://your.domain.ru/images/1x1.png' if grep ($url=~/$_/i, @banners) ;
   print "$url $who $ident $method\n" ;
}


Взято здесь: http://linuxnews.ru/docs/showdoc.php?id=4668&thread=4668

squidGuard
dansguardian
sams
...

а в гугл не пробовал спрашивать? говорят, очень помогает! ;)


http://www.google.com.ua/search?q=squid+%D1%80%D0%B5%D0%B4%D0%B8%D1%80%D0%B5%...