ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexander Babanov                    2:5020/5609.69 05 Mar 2001  08:40:26
 To : Alexandr Murin
 Subject : Re: что-то не догоняю
 -------------------------------------------------------------------------------- 
 

 Юґullo Alexandr!
 
  KP>>   Имеем стpокy вида
  KP>> 'some text name1=value1 name2=value2 name3 =value3 name4 = value5 some
  KP>> text' нyжно выципить в массив все паpы т.е. name1=value1 и т.д. Если в
  KP>> хеш то даже лyчше...
 
  AM> my $line = 'some text name1=value1 name2=value2 name3 =value3 name4 =
  AM> value5 some text';
  AM> $pairs{$1} = $2 while ($line =~ m/([^\s=]+)\s*=\s*([^\s=]+)/g);
 
 %pairs = $line =~ /([^\s=]+)\s*=\s*([^\s=]+)/g;
 
 или, возможно,
 
 %pairs = $line =~ /(\w+)\s*=\s*(\S+)/g;
 
 CYa!!!
 
 ЪДВїЪДВВВДДДщщъъ ЪДВВВДї ЪїЪДВДДДДДДДДщщъъ   ЪДДДД 2:5020/5609.69 ДДДї
 іВіАґДЕ ґBabanov іВі ґВі іАґВіST BERSERKER   і babanov@earthlink.net і
 ... Еще наше поколение будет жить при Виагре! [предп. из писем Ильича к HКК]
 ---
  * Origin: Our governor can beat up your governor! (2:5020/5609.69)
 
 

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

Тема:    Автор:    Дата:    что-то не догоняю   Konstantin Petrenko   05 Mar 2001 14:47:53   что-то не догоняю   Alexandr Murin   05 Mar 2001 16:13:03   Re: что-то не догоняю   Alexander Babanov   05 Mar 2001 08:40:26   что-то не догоняю   Ivan Frolcov   05 Mar 2001 13:36:18