[mdk-re] Offtopic. Perl question

[Sergey Degtyaryov]

Vladimir Karpinsky wrote:
> Здравствуйте
> 
> Прошу прощения за offtopic, но никак не могу понять, как вызвать в
> теле перлового скрипта внешнюю программу, причем той в качестве
> аргументов подставлять переменные определенные в самом скрипте.
> Переменные определяются по итогам разбора каждой строки некого файла,
> соответственно эти переменные переопределяются каждый раз при переходе
> к новой строке, ну и программу надо также выполнить для каждой строки
> этой таблицы. Смотрю в книгу а решения найти не могу. Если кто сможет

$domain = shift;
$|++;
my $command = "whois ".$domain;
open (WHOIS, "$command |") || die $!;
while (<WHOIS>) {print;print "\n";}
close (WHOIS);

-- 
Ciao, maga, maga на mail.ru
--
Земля плоская. Hо толстая..