Репозитории ALT
S: | 3.2.8-alt2 |
5.1: | 3.2.2-alt1 |
4.1: | 3.2.1-alt5.M41.1 |
4.0: | 3.2.1-alt6.M40.1 |
3.0: | 3.1.0-alt1b |
Группа :: Сети/Прочее
Пакет: redirector
Главная Изменения Спек Патчи Исходники Загрузить Gear Bugs and FR Repocop
www/ 0000755 0000000 0000000 00000000000 12132612570 0011677 5 ustar 00root root 0000000 0000000 www/1x1.gif 0000644 0000000 0000000 00000000053 12132612570 0012775 0 ustar 00root root 0000000 0000000 GIF89a ─Ъ ююю !Ы , D ; www/cgi-bin/ 0000755 0000000 0000000 00000000000 12132612570 0013207 5 ustar 00root root 0000000 0000000 www/cgi-bin/ban.cgi 0000755 0000000 0000000 00000001434 12132612570 0014440 0 ustar 00root root 0000000 0000000 #!/usr/bin/perl -w
use CGI qw/:standard/;
$url=param("url") || "";
$ip=param("ip") || "";
$login=param("login") || "";
$sec=param("sec") || "";
print header(-charset=>'KOI8-R');
print start_html("BAN PAGE"),h1("<center>Доступ к этому сайту для Вас заблокирован!</center>");
print "<STRONG>Дополнительная информация:</STRONG>";
print p("url: $url");
print p("ip: $ip");
print p("ligin: $login");
print p("section: $sec");
print hr;
print "<CENTER>Если Вы думаете, что это ошибка - пошлите содержимое Дополнительной информации по адресу:<A HREF=\"mailto:me
\@me.ru\">me\@me.ru</A></CENTER>";
print "<CENTER>Возможно Вам необходимо нажать в браузере кнопку <Reload></CENTER>";
print "<CENTER>или даже <Shift>+<Reload></CENTER>","<BR>";