|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrew Alakozow 2:5061/6 01 Feb 2007 20:13:02 To : All Subject : Re: Перенаправление в -------------------------------------------------------------------------------- > Vadim Tzirulnicov @ Thu, 1 Feb 2007 09:00:24 +0000 (UTC): > > VT> Есть скрипт, который нельзя править. Hужно получить вывод от него, > VT> кое-что > в > VT> этом выводе поменять, и вывести на экран. > > VT> Т.е. что-то вроде > VT> my $m; > VT> select($m); > VT> require("cms.pl"); > VT> select(STDOUT); > VT> print change_output($m); > > VT> Как реализовать задуманное ? > > Подозреваю, что стоит почитать документацию на IO::* на предмет хендла, > работающего с памятью. > Точно. $str_fh = IO::String->new($output); $old_fh = select($str_fh); print 'foo'; select($old_fh); print "output: $output\n"; -- Андрей. --- Mozilla Thunderbird 1.0.7 (X11/20060123) * Origin: Life In The Dark (2:5061/6) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/412240d5cc5b3.html, оценка из 5, голосов 10
|