ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Sergey Samokhokin                    2:5020/400     23 Dec 2000  08:47:09
 To : All
 Subject : Re: stdout
 -------------------------------------------------------------------------------- 
 

 
 Vitali Gontchar пишет в сообщении <91n4ee$1mu4$1@news.kiev.sovam.com> ...
 
 >Привет!
 >Есть программа, которая в результате своей работы выводит что-то на экран.
 >
 >Мне нужно, чтобы это что-то перехватывалось программой на перл и дальше я
 >мог что-то с этим делать, т.е загнать в переменную.
 >Как такое можно осуществить?
 >
 >делаю do "mybin>vvv.txt"; пытаюсь перенаправить вывод в файл, но не
 >работает.
 >
 
    Hапример, так
 
   open(FOUT,"myprog |")  || die("Can't fork:\n$!);
 
   while (<FOUT>)  {
        # Делай все, что хочешь с выводом.
   };
 
   или
 
   $result=`myprog`;
 --- ifmail v.2.15dev5
  * Origin: InterNetNews server of Sitek network (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    stdout   Vitali Gontchar   22 Dec 2000 13:01:40   Re: stdout   Sergey Samokhokin   23 Dec 2000 08:47:09