Первожу ip в десятичную форму:
Мне это надо для сравнения адресов который выдает ulogd, но у меня адреса в десятичном виде не совпадают с тем, что выдает ulogd. Вот
алгоримт перевода, подскажите нет ли ошибки.
my $in = "192.168.0.1";
my @a = split (/\./,$in);
print (($a[0]<<24)+($a[1]<<16)+($a[2]<<8)+$a[3]);