ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Vladimir Podgorny                    2:5020/400     06 Aug 2003  11:16:39
 To : Yuri Shlyapkin
 Subject : Re: IP address
 -------------------------------------------------------------------------------- 
 

 Yuri Shlyapkin <shl@mail.ru> wrote:
 
 > Hello, All!
 > 
 > Hужно перевести IP адрес формата A.B.C.D в обычное число:
 > IP Number = A x 16777216 + B x 65536 + C x 256 + D
 > Вопрос: есть ли стандартная функция?
 
 Знамо дело есть...
 
 sub ipv4_to_dec($) {
   my @ipv4 = reverse split /\./, shift || return undef;
   my $dec = 0;
   $dec += $ipv4[$_] * 256 ** $_ foreach (0 .. 3);
   $dec;
 }
 
 P.S. лень - двигатель прогресса... :)
 
 -- 
 VP992-RIPE | The girl opened her mouth, I opened my veins...
            | (c) Tiamat, "Clouds" '92, "Undressed"
 --- ifmail v.2.15dev5
  * Origin: Adamant ISP news server (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    IP address   Yuri Shlyapkin   06 Aug 2003 07:45:58   Re: IP address   Vladimir Podgorny   06 Aug 2003 11:16:39   Re: IP address   Anatoly Moskovsky   06 Aug 2003 14:27:02   Re: IP address   Yuri Shlyapkin   07 Aug 2003 08:06:27   IP address   Antony Gerasimov   07 Aug 2003 10:32:16