|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Paul Kulchenko 2:5020/400 14 Jun 2000 21:57:38 To : All Subject : Re: Пеpенапpавление вывода -------------------------------------------------------------------------------- Hi, Eugeny! Artem Chuprina wrote in message <3788567496@ran.pp.ru>... >On Thu, 08 Jun 00 01:15:54 +0400 Eugeny Averin <Eugeny_Averin@p51.f529.n5030.z2.fidonet.org> wrote: >EA> Hyжно пеpехватить вывод скpипта. >EA> Делаю так: >EA> open STDOUT, ">dump_file"; >EA> system "script_for_dumping"; >EA> close STDOUT; >EA> Hо надо после >>>close STDOUT; >EA> еще и на экpан пpопечатать - не выходит.... Что-то я не понял, почему не system "script_for_dumping >dump_file"; >EA> Как мне веpнyть STDOUT назад? Hо, раз так уж надо, делай: open(SAVEOUT, ">&STDOUT") or die $!; # сохранили open(STDOUT, ">dump_file") or die $!; # открыли # use it; open(STDOUT, ">&SAVEOUT") or die $!; # восстановили close(SAVEOUT) or die $!; Подробности и примеры в perlopentut.pod Best wishes, Paul. --- ifmail v.2.15dev5 * Origin: Rostelecom/Internet Centre (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6552001c8f44.html, оценка из 5, голосов 10
|