FastNetMon

Wednesday 18 July 2012

YADIFA - скоростная замена Bind от зоны .eu

Oracle Linux - BTRF в продакшене!

Преобразование IP адреса в целое число на Perl


Вариант 1 -  готовый модуль:
perl -MNet::IP -e '$ip = new Net::IP("192.168.1.1"); print $ip->intip();'
3232235777 
 Вариант 2 - использование короткой функции:
perl -e '$ip = "192.168.1.1"; print unpack("N",pack("C4",split(/\./,$ip)))'
3232235777
Источник: http://cpansearch.perl.org/src/SARENNER/Net-IPAddress-1.10/IPAddress.pm

Как найти определенную сетевую карту на Linux сервере?

В случае использования большого числа карт, поиск нужного порта превращается в ад, но есть чудесный флаг у утилиты ethtool, который позволяет поморгать лампочками на заданной карте:

     -p --identify
              Initiates  adapter-specific action intended to enable an operator to easily identify the adapter by sight.  Typically this involves blinking one or more LEDs on the specific ethernet port.

Sunday 1 July 2012

Исполнение CGI приложений на lighttpd на Debian 6 Squeeze

Очень часто встает необходимость снабдить небольшой скрипт на Perl, но тащить ради этого Apache крайне не хочется, тут нам на помощь приходит легкий lighttpd, который умеет запускать CGI приложения.

Устанавливаем:
apt-get install -y lighttpd lighttpd-doc  
 Включаем CGI модуль:
lighttpd-enable-mod cgi
Применяем изменения:
/etc/init.d/lighttpd restart 
Создаем папку для CGI приложений:
mkdir /var/www/cgi-bin 
Создаем тестовое CGI приложение на Perl:
vim /var/www/cgi-bin/test.pl
Код:
#!/usr/bin/perl
use strict;
use warnings;
print "Content-type: text/html\n\n";
print "Hello, World!"; 
Выставляем exec флаг:
chmod +x /var/www/cgi-bin/test.pl
Запускаем через браузер: http://x.x.x.x/cgi-bin/test.pl