ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Sergej Tarasov                       2:5020/175.2   25 Nov 2003  03:09:44
 To : Vitaly Gorohov
 Subject : Вопpос по скоpости....
 -------------------------------------------------------------------------------- 
 

 Sun Nov 23 2003 16:53, Vitaly Gorohov wrote to All:
 
  VG> ($DataString=~m/"(\S*)","(\S*)","(\S*)","(\S*)","(\S*)","(\S*)","(\S*)","
  VG> (\S*)" ,"(\S*)","(\S*)","(\S*)","(\S*)","(\S*)","(\S*)","(\S*)"/o)
  
 
 1) Убрать все ненужные скобки (ну и попробовать [^"], как уже советовали).
 
 2) Попробовать через split
 
    my ($host, $size) = (split(/","/,$DataString))[9,14];
 
 --- ifmail v.2.15dev5
  * Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)
 
 

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

Тема:    Автор:    Дата:    Вопpос по скоpости....   Vitaly Gorohov   23 Nov 2003 17:53:00   Вопpос по скоpости....   Ivan Frolcov   24 Nov 2003 16:35:18   Вопpос по скоpости....   Vitaly Gorohov   24 Nov 2003 19:39:00   Re: Вопpос по скоpости....   Ivan Frolcov   24 Nov 2003 23:55:38   Re: Вопpос по скоpости....   Konstantin Tokar   24 Nov 2003 16:39:27   Вопpос по скоpости....   Vitaly Gorohov   24 Nov 2003 19:32:00   Вопpос по скоpости....   Sergej Tarasov   25 Nov 2003 03:09:44   Вопpос по скоpости....   Vitaly Gorohov   25 Nov 2003 18:08:00   Вопpос по скоpости....   Renat Araslanow   25 Nov 2003 13:47:46