ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Igor Moskin 2:5020/400 23 Nov 2003 16:30:59
To : All
Subject : Вывод "ребенка" в STDOUT
--------------------------------------------------------------------------------
Всем привет !
Подскажите пожалуйста как сразу перенаправить вывод команды $cmd на STDOUT
минуя чтение в массив и вывод его содержимого:
eval {
alarm($TIMEOUT);
$pid=open (inf, "$cmd $arg1 $arg2|" ) || die "Error 9";
@fields=<inf>;
close (inf);
print @fields;
alarm (0);
}
Задача вобщем такая: приведенный кусочек выполняются "ребенком",
а "родителю" нужно прочитать результаты из STDIN
Если "ребенок" задержится с выполнени то
$SIG{ALRM} = sub { kill -9 => $pid };
--
--- ifmail v.2.15dev5.1
* Origin: ISP ElCat. Bishkek. Kyrgyzstan. (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
