Скрипт:
#!/usr/bin/perl -w
my $ip_addr="194.67.57.26";
my $name=gethostbyaddr($ip_addr, AF_INET);
print "$name\n";
При использовании скрипта выдает ошибки:
Argument "AF_INET" isn't numeric in gethostbyaddr at ./tesr.pl line 3.
Use of uninitialized value in concatenation (.) or string at ./tesr.pl line 4.
В чем ошибка????

А если такой запустить:
my $ip_name="mail.ru"
my $name=gethostbyaddr($ip_name);
print "$name\n";

выдает какую то бредятину вроде:
бC9

Немогу понять!!! разъясните!

• Perl - gethostbyaddr,madskull, 09:50 , 20-Июн-06
  • Perl - gethostbyaddr,tuxper, 22:19 , 22-Июн-06

>my $name=gethostbyaddr($ip_addr, AF_INET);
>Argument "AF_INET" isn't numeric in gethostbyaddr at ./tesr.pl line 3.
Как говорится, какое слово перевести?
Откуда perl узнает о "AF_INET"? Либо используй числовые значения, либо подключай модуль Socket.
В обчем, perldoc -f gethostbyaddr

>Откуда perl узнает о "AF_INET"? Либо используй числовые значения, либо подключай модуль
>Socket.
>В обчем, perldoc -f gethostbyaddr

Спасибо, все ок. забыл модуль подключить... =)