ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artur Penttinen                      2:5020/400     28 Jun 2000  12:10:46
 To : All
 Subject : Re: How?
 -------------------------------------------------------------------------------- 
 

 On 27 Jun 2000, Artiom Morozov wrote:
 
 > From: Artiom Morozov <apm@csp.org.by>
 > Newsgroups: fido7.ru.perl
 > Subject: Re: How?
 > Date: 27 Jun 2000 19:16:18 +0400
 > X-Mailer: Mozilla 4.61 [en] (X11; I; Linux 2.2.11-4bc i686)
 > Organization: CSP Ltd.
 > 
 > Fair day,
 > 
 > Alexander Semenov wrote:
 > 
 > > > Fair day,
 > > > > strN=valueN
 > > > > как это загнать в %hash??? где почитать?
 > > > %hash = map { split(/=/) } <>;
 > > Hу да, типа, красиво, а что не эффективно и value с '=' внутри не
 > > понимает не важно. В реальных программах, это приходится делать так:
 > Ok, naschet value soglasen
 > 
 > > foreach (split /\n/s, join '', @data) {
 > >         my $ix = index($_, '=');
 > >         if( $ix > -1 ) {
 > >             my $key = substr $_, 0, $ix;
 > >             my $val = substr $_, $ix+1;
 > > 
 > >             $val =~ s/\'\'/\"/g;  # И другие дообработки values...
 >                ^^^^^^^^^  Zachem???
 > >             $self->{$key} = $val;
 > >         }
 > > }
 > 
 > A teper' uberyem lishnie peremennye iz koda ;-)
 > foreach (<>) {
 >   $self->{$1} = $2 if (m/([^=]*)=(.*)/om);
 > }
 
   Общими усилиями:
 
   %hash = map { split(/=/,$_,2) } <>;  
 
           WBW, Artur
 
 -- 
 Поднявший меч живет в казарме
 
 --- ifmail v.2.15dev5
  * Origin: Gamma NNTP server Moscow Russia (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    How?   Serge Romanchenko   26 Jun 2000 20:44:42   Re: How?   Artur Penttinen   27 Jun 2000 14:05:25   Re: How?   Ilya Rubtsov   27 Jun 2000 14:13:59   Re: How?   Artiom Morozov   27 Jun 2000 16:54:47   Re: How?   Alexander Semenov   27 Jun 2000 18:21:02   Re: How?   Artiom Morozov   27 Jun 2000 19:16:18   Re: How?   Artur Penttinen   28 Jun 2000 12:10:46   Re: How?   Alex Lazarev   28 Jun 2000 08:36:36   Re: How?   Igor Nikolaev   29 Jun 2000 03:40:06   How?   Rodion Nazarow   28 Jun 2000 13:12:50   How?   Alexander Temerev   28 Jun 2000 19:36:07