https://slinkov.ru/openforum/vsluhforumID12/5274.html После обновления Squid version 2.5.STABLE9 до Squid version 2.6.STABLE5<br>перестал отрабатывать redirector который позволял пользователю с уч. записью гость<br>посещать сайты только из списка, что то вроде<br>#!/usr/bin/perl<br>$0 = 'redirector' ;<br>$&#124; = 1 ; <br>@list1 = qw (<br>#good domain list<br>ya.ru<br>rambler.ru<br>bash.org.ru<br>) ;<br>@list2 = qw (<br>);<br>@ll1 = qw (<br>#limit list 1<br>guest<br>);<br>while (&lt;&gt;) {<br>$llp1 = "0";$listp1 = "0";<br>($url, $who, $ident, $method) = /^(\S+) (\S+) (\S+) (\S+)$/ ;<br>if (grep $ident =~ m%$_%, @ll1) {$llp1 = "1";}<br>if (grep $url =~ m%$_%, @list1) {$listp1 = "1";}<br>if (grep $url =~ m%$_%, @list2) {$listp1 = "2";}<br>$url = "http://192.168.1.1/1x1.gif";<br>if (($llp1 eq "1")and($listp1 eq "1")) {$url = ""}<br>if ($llp1 eq "0") {$url = "";}<br>if ($listp1 eq "2") {$url = "http://adm"}<br>print "$url $who $ident $method\n" ;<br>}<br>И если есть возможность описать более гибкий вариант гостевой записи =)<br><br> https://slinkov.ru/openforum/vsluhforumID12/5274.html#1 Thu, 13 Dec 2007 12:40:07 GMT &gt;[оверквотинг удален]<br>&gt;if (grep $ident =~ m%$_%, @ll1) {$llp1 = "1";} <br>&gt;if (grep $url =~ m%$_%, @list1) {$listp1 = "1";} <br>&gt;if (grep $url =~ m%$_%, @list2) {$listp1 = "2";} <br>&gt;$url = "http://192.168.1.1/1x1.gif"; <br>&gt;if (($llp1 eq "1")and($listp1 eq "1")) {$url = ""} <br>&gt;if ($llp1 eq "0") {$url = "";} <br>&gt;if ($listp1 eq "2") {$url = "http://adm"} <br>&gt;print "$url $who $ident $method\n" ; <br>&gt;} <br>&gt;И если есть возможность описать более гибкий вариант гостевой записи =) <br><br>