|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Љ®«п Ѓ®Є®ў 2:5020/175.2 27 Jan 2006 18:06:13 To : Ilya Anfimov Subject : Re: Фильтрация текста -------------------------------------------------------------------------------- Привет, Fri Jan 27 2006 15:29, Ilya Anfimov wrote to Коля Боков: >> 18 while (<$inh>) { >> 19 >> 20 map $_."\n", >> 21 grep !exists $used{$_} && ($used{$_}=1), >> 22 grep m/^T_/, >> 23 m/(\w+)/g; IA> Успешно сделал map и не присвоил результат ничему (выкинул его). >> 24 >> 25 }; >> 26 >> 27 print $outh @_; IA> Hапечатал в $outh параметры вызова функцыи. Мда, глупо. %) Спасибо за помощь! --- ifmail v.2.15dev5 * Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2) Вернуться к списку тем, сортированных по:
Архивное /ru.cgi.perl/3300f68a355d.html, оценка из 5, голосов 10
|