Веб мордочка для биллинга на Perl (Debian + ulogd-mysql): начало

Стоит задача красиво показывать сегодняшний трафик (здесь и далее -- входящий) клиентов по айпи, трафик за месяц, суммарный трафик + банить (todo) клиентов при преодолении порога по трафику.

Бан осуществляется так:

sudo iptables -A FORWARD -s 192.168.1.10 -j DROP разбанедь
sudo iptables -D FORWARD -s 192.168.1.10 -j DROP забанедь

Выборки по мак адресу производятся так:
select FROM_UNIXTIME(oob_time_sec), raw_mac, INET_NTOA(ip_saddr) as sip,INET_NTOA(ip_daddr) as dip, sum(ip_totlen) / 1024 / 1024 from ulog group by raw_mac;

Для показа нашей мордочки будем юзать lightttpd, ставим и настраиваем его мы так:

sudo apt-get install lighttpd bzip2
sudo lighty-enable-mod cgi # включаем cgi
/etc/init.d/lighttpd force-reload

Идём в папку: /usr/lib/cgi-bin

sudo vim bill.pl

и туда:

#!/usr/bin/perl
print "Content-type: text/html\n\n";
print "Hello, World.";

sudo chmod 755 bill.pl

Потом открываем http://192.168.155.51/cgi-bin/bill.pl и должны увидеть соотв-ую надпись :)
Всё, с подготовительными работами всё, продолжение читайте дальше =)