Народ у меня проблема, я запускаю из скрипта прогу, она выдаёт текст в браузер, а он мне там не нужен. Подскажите как мне записать выходные данные запущенной проги в строку или масив, и чтобы эти данные не выводились в браузер???
Заранее спасибо.

study
Ты наверное прогу запускаеш так: system("что то");

Делай так:
my @out=`что то`; # `- обратная кавычка слева от 1

dimes, да как ты сказал я прогу запускаю и все нормально, но как мне тогда проверись с каким кодом завершился процесс, system() возвращает код завершения, а `.............` возвращает stdout

Не проще вместо проги вызывать функцию, которая и будет возвращать строку или массив?

нет, не проще, мне нужно прогу запустить, а не функцию.
Всем спасибо, я решил свою задачу так: запаустил system(), получил результат system(), а stdout и stderr перенаправил во временные файлы, вот код:

$result=system("/program 1>/tmp/out.out 2>/tmp/err.err");

Если у кого-нибудь есть ещё варианты, пишите будет интерестно

Код

close STDOUT; close STDERR; print 1; print aa;

ElectricalStorm, может подскажешь, как мне потом снова открыть stdout, с помощью open stdoun; не получается???

ага неполучиться ...нужно стначала копию сохранить а потом востановить ....

Код

# take copies of the file descriptors open(OLDOUT, ">&STDOUT"); # redirect stdout and stderr open(STDOUT, ">program.out")    or die "Can't redirect stdout: $!"; # close the redirected filehandles close(STDOUT)                       or die "Can't close STDOUT: $!"; # restore stdout open(STDOUT, ">&OLDOUT")            or die "Can't restore stdout: $!"; # avoid leaks by closing the independent copies close(OLDOUT)                       or die "Can't close OLDOUT: $!"; print 1;

ElectricalStorm, скажи пожалуйста как мне очистить stdout и stderr

что значит очистить ? .... может имеется ввиду их буфер ?

наверно, я не спец. Смотри в чем проблема, мне надо запустиь прогу, я её запускаю с помощью system, можно как то перенаправить stdout этой проги в массив или переменную? Я это раньше делал перенаправляя её выход в файл, но сейчас мне надо это прогу клонировать, и ничего не получаеться. Хочу попробовать решить это так: получить чистый stdout проги, а потом пепекопировать в массив.

что по-вашему клонировать прогу ?
скпопировать исходный текст ?

какую задачу Вы решаете в общем ???

нет, запускать несколько процессов одновременно. В общем задача такая: существует программа для проверки пропускной способности сети, мне необходимо написать скрипт для запуска этой проги и сгенерировать отчеты. Программа выдаёт в stdout результаты, они отправляются прямо в браузер, а мне это не нужно, мне нужно обработать результат, и выдать в браузел определённые данные. Оказалось, что если компьютер недоступен, то эта прога ждёт тайм аут около минуты, что неприемлимо!(КАК РЕШИТЬ ЭТУ ПРОБЛЕМУ ТОЖЕ НЕ ЗНАЮ) Пока мне надо добиться того, чтобы прога выдавала свой stdout и strerr в какой-нибудь массив, но не в браузер. Как решить эти задачи

пока такой вопрос...

на чем написана программа для проверки пропускной способности сети ?

и еще

сделайте скрипт 1.pl в нем

Код

warn $!; print 10,"\n";

и скрипт 2.pl в нем

Код

$res = system('perl 1.pl'); print $res;

и запустите perl 2.pl

сморим результат...

Это сообщение отредактировал(а) ElectricalStorm - 10.11.2004, 18:24