|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Mikail Majorov 2:5020/400 10 Jul 2002 08:58:17 To : Alexander Lunkov Subject : Re: regexp -------------------------------------------------------------------------------- On Tue, 09 Jul 2002 17:37:03 +0400 Alexander Lunkov <Alexander.Lunkov@p26.f201.n5055.z2.fidonet.org> wrote: > Hello, *All!* > > > Можно ли объеденить след. строки в одну? Hесомнено. > Вырезаем 10:43 из 2002-Jun-23 10:43:20.76: > $log_time=~s/(\d+)-(\w+)-(\d+) //; > $log_time=~s/:(\d+)\.(\d+)//; $log_time=~s/^.+?\s(\d+:\d+):.+$/$1/; > Преобразуем dir/file.txt к dir,file. > $flist[$i]=~s%^(\w+)/%%; > $flist[$i]=~s/\.txt$//; > $flist[$i]=~s/\//,/; > > Можно сделать проще? Да. По аналогии. -- С уважением, Михаил Майоров Таганрогский Узел ЭлектроСвязи +7 8634 362563 +7 8634 383242 fax only --- ifmail v.2.15dev5 * Origin: Private (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/151504f3210a.html, оценка из 5, голосов 10
|