ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Vladimir Podgorny                    2:5020/400     10 Jul 2002  11:18:40
 To : Alexander Lunkov
 Subject : Re: regexp
 -------------------------------------------------------------------------------- 
 

 Alexander Lunkov <Alexander.Lunkov@p26.f201.n5055.z2.fidonet.org> wrote:
 
 >            Hello, *All!*
 > 
 > 
 >    Можно ли объеденить след. строки в одну?
 > Вырезаем 10:43 из 2002-Jun-23 10:43:20.76:
 >    $log_time=~s/(\d+)-(\w+)-(\d+) //;
 >    $log_time=~s/:(\d+)\.(\d+)//;
 
 my $log_time = /\b(\d{2}:\d{2}):/;
 
 > Преобразуем dir/file.txt к dir,file.
 >    $flist[$i]=~s%^(\w+)/%%;
 >    $flist[$i]=~s/\.txt$//;
 >    $flist[$i]=~s/\//,/;
 
 $flist[$i] =~ s#^(.*)/([^/]+)\.\w+$#$1,$2#;
 
 >    Можно сделать проще?
 > 
 >                                                    Sincerely yours, Alex
 > 
 
 -- 
 VP992-RIPE
 --- ifmail v.2.15dev5
  * Origin: Adamant ISP news server (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    regexp   Alexander Lunkov   09 Jul 2002 18:37:03   Re: regexp   Mikail Majorov   10 Jul 2002 08:58:17   Re: regexp   Vladimir Podgorny   10 Jul 2002 11:18:40