From combr на vesna.ru Fri Feb 6 03:22:53 2004 From: combr на vesna.ru (Mike Lykov) Date: Mon Aug 2 21:36:16 2004 Subject: =?koi8-r?b?wdDPy8HMydDTydMg1yDQxdLMNg==?= Message-ID: http://dev.perl.org/perl6/apocalypse/A05.html - это насчет регекспов. там есть и насчет другого ;) Given all this, I need to warn you that this Apocalypse is going to be somewhat radical. We'll be proposing changes to certain "sacred" features of regex culture, and this is guaranteed to result in future shock for some of our more conservative citizens. Do not be alarmed. We will provide ways for you to continue programming in old-fashioned regular expressions if you desire. But I hope that once you've thought about it a little and worked through some examples, you'll like most of the changes we're proposing here. -- Mike From petr999 на mail.ru Mon Feb 9 07:52:08 2004 From: petr999 на mail.ru (Peter Vereshagin) Date: Mon Aug 2 21:36:16 2004 Subject: [dummy] =?koi8-r?b?z8LSxdPF1MnU2CDIxdsg0MXSxcQ=?= each? Message-ID: <20040209135719.GA32418@least.beast> each() не работает, если перед ним не вставить, например, join(). Видимо, в хеше есть какой-то вгутри указатель на текущий ключ? Как бы этот указатель сбросить? === #join( ':', %h ); while( ( my $key, my $val ) = each %h ){} === так примерно не работает -- http://raigra.km.ru From =?koi8-r?Q?=EB=CF=D0=D9=CC_=E0=D2=C9=CA_=F7=C1=CC=C5=D2=C9=C5=D7=C9?= Mon Feb 9 08:04:03 2004 From: =?koi8-r?Q?=EB=CF=D0=D9=CC_=E0=D2=C9=CA_=F7=C1=CC=C5=D2=C9=C5=D7=C9?= (=?koi8-r?Q?=EB=CF=D0=D9=CC_=E0=D2=C9=CA_=F7=C1=CC=C5=D2=C9=C5=D7=C9?=) Date: Mon Aug 2 21:36:16 2004 Subject: =?koi8-r?b?UmU6IFtkdW1teV0gz8LSxdPF1MnU2CDIxdsg0MXSxcQgZWFjaD8=?= Message-ID: <64D65C7453E5ED4480B8422A21477AE15500@srv2.promekbank> приведи полный код "Peter Vereshagin" сообщил/сообщила в новостях следующее: news:<20040209135719.GA32418@least.beast>... > > each() не работает, если перед ним не вставить, например, join(). > Видимо, в хеше есть какой-то вгутри указатель на текущий ключ? Как бы > этот указатель сбросить? === #join( ':', %h ); while( ( my $key, my > $val ) = each %h ){} === > так примерно не работает > > -- > http://raigra.km.ru From petr999 на mail.ru Mon Feb 9 08:19:52 2004 From: petr999 на mail.ru (Peter Vereshagin) Date: Mon Aug 2 21:36:16 2004 Subject: [dummy] =?koi8-r?b?z8LSxdPF1MnU2CDIxdsg0MXSxcQ=?= each? In-Reply-To: References: Message-ID: <20040209142503.GC32418@least.beast> посмейся. === sub cgi2uri{ my %h; ( my $p, my $u ) = ( shift @_, shift @_ ); #join( ':',%$p); while( ( my $key, my $val )= each %$p ){ print "P $key:$val\n"; $h{$key}=${$p}{$key}; } while( ( my $key, my $val )= each %$u ){ print "U $key:$val\n"; $h{$key}=${$u}{$key}; } return enurl \%h; } === убираем диез --- вуаля сапожники! Mon, Feb 09, 2004 at 06:04:03PM +0400 Копыл Юрий Валериевич To 'samara-pm@mail.pm.org' КЮВ> приведи полный код КЮВ> "Peter Vereshagin" сообщил/сообщила в новостях следующее: КЮВ> news:<20040209135719.GA32418@least.beast>... КЮВ> > each() не работает, если перед ним не вставить, например, join(). КЮВ> > Видимо, в хеше есть какой-то вгутри указатель на текущий ключ? Как бы КЮВ> > этот указатель сбросить? === #join( ':', %h ); while( ( my $key, my КЮВ> > $val ) = each %h ){} === КЮВ> > так примерно не работает -- http://raigra.km.ru From evil на sama.ru Mon Feb 9 11:15:12 2004 From: evil на sama.ru (Andrew Khmelev) Date: Mon Aug 2 21:36:16 2004 Subject: =?koi8-r?b?UmU6IFtkdW1teV0gz8LSxdPF1MnU2CDIxdsg0MXSxcQgZWFjaD8=?= References: <20040209135719.GA32418@least.beast> Message-ID: Hello, Peter! You wrote on Mon, 9 Feb 2004 13:52:08 +0000 (UTC): PV> each() не работает, если перед ним не вставить, например, join(). PV> Видимо, в хеше есть какой-то вгутри указатель на текущий ключ? Да. PV> Как бы этот указатель сбросить? keys или values Sincerely, Andrew Khmelev From evil на sama.ru Mon Feb 9 11:20:51 2004 From: evil на sama.ru (Andrew Khmelev) Date: Mon Aug 2 21:36:16 2004 Subject: =?koi8-r?b?UmU6IFtkdW1teV0gz8LSxdPF1MnU2CDIxdsg0MXSxcQgZWFjaD8=?= References: <20040209142503.GC32418@least.beast> Message-ID: Hello, Peter! You wrote on Mon, 9 Feb 2004 14:19:52 +0000 (UTC): PV> посмейся. PV> === ужоз. PV> sub cgi2uri{ PV> my %h; ( my $p, my $u ) = ( shift @_, shift @_ ); %h = (%$p, %$u); остальное - в утиль. PV> #join( ':',%$p); PV> while( ( my $key, my $val )= each %$p ){ PV> print "P $key:$val\n"; PV> $h{$key}=${$p}{$key}; PV> } PV> while( ( my $key, my $val )= each %$u ){ PV> print "U $key:$val\n"; PV> $h{$key}=${$u}{$key}; PV> } PV> return enurl \%h; PV> } PV> === Sincerely, Andrew Khmelev From combr на vesna.ru Mon Feb 9 22:22:13 2004 From: combr на vesna.ru (Mike Lykov) Date: Mon Aug 2 21:36:16 2004 Subject: [dummy] =?koi8-r?b?z8LSxdPF1MnU2CDIxdsg0MXSxcQgZWFjaD8=?= References: <20040209142503.GC32418@least.beast> Message-ID: Andrew Khmelev писал: > остальное - в утиль. Эстетично говорить: "фтопку" ;) -- Mike From petr999 на mail.ru Tue Feb 10 02:47:48 2004 From: petr999 на mail.ru (Peter Vereshagin) Date: Mon Aug 2 21:36:16 2004 Subject: [dummy] =?koi8-r?b?z8LSxdPF1MnU2CDIxdsg0MXSxcQ=?= each? In-Reply-To: References: <20040209135719.GA32418@least.beast> Message-ID: <20040210085259.GC14319@least.beast> Mon, Feb 09, 2004 at 09:15:12PM +0400 Andrew Khmelev AK> PV> Видимо, в хеше есть какой-то вгутри указатель на текущий ключ? AK> Да. AK> PV> Как бы этот указатель сбросить? AK> keys или values сам вчера нашёл про это в cookbook. А типа как reset() в php нету? а то лишние действия вроде. Или без присвоения --- аналог? -- http://raigra.km.ru From petr999 на mail.ru Tue Feb 10 02:49:18 2004 From: petr999 на mail.ru (Peter Vereshagin) Date: Mon Aug 2 21:36:16 2004 Subject: [dummy] =?koi8-r?b?z8LSxdPF1MnU2CDIxdsg0MXSxcQ=?= each? In-Reply-To: References: <20040209142503.GC32418@least.beast> Message-ID: <20040210085430.GD14319@least.beast> Mon, Feb 09, 2004 at 09:20:51PM +0400 Andrew Khmelev AK> остальное - в утиль. AK> PV> return enurl \%h; ^^^^^ нда? -- http://raigra.km.ru