[Comm] SQUID

[=?iso-8859-1?q?Maxim=2ESavrilov_=CE=C1_socenter=2Eru?=]

On Fri, 14 Mar 2003 13:46:24 +0300
Oleg <wacom на narod.ru> wrote:

> Hello community,
> 
>   Можно ли заставить squid
>   не просто вырезать баннеры,
>   а подставлять на их место какую-нибудь свою картинку?
> 
./etc/squid/squid.conf
redirect_program /etc/squid/redirector


./etc/squid/redirector
#!/usr/bin/perl                                                                                   
                                                                                                  
$0 = 'redirector' ;                                                                               
                                                                                                  
$| = 1 ;                                                                                          
                                                                                                  
$SITE = 'http://localhost/banners' ;                                                  

@b    = qw (                                                                                
                 reklama\.ru/cgi\-bin/banner/
...
 ) ;

$b_     = "$SITE/468x60.gif" ;
while (<>) {                                                                                      
  ($url, $who, $ident, $method) = /^(\S+) (\S+) (\S+) (\S+)$/ ;                                   

   $url = $b_ if grep $url =~ m%$_%, @b ;                                                                                            
  print "$url $who $ident $method\n" ;                                                            
}                                                                                                 


Вот типа если совсем просто
Лучше, конечно на С
но принцип понятен