|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Anton Potekhin 2:5020/400 01 Feb 2005 17:24:40
To : Konstantin Tokar
Subject : Re: array
--------------------------------------------------------------------------------
Hello, Konstantin!
You wrote to Anton Potekhin on Tue, 1 Feb 2005 12:55:07 +0000 (UTC):
KT> use strict;
KT> my %words;
KT> while (<>) {
KT> chomp;
KT> my @words = split /\s+/;
KT> map { $words{$_}++; } @words;
KT> } ## end while (<>)
KT> while ( my ( $word, $count ) = each %words ) {
KT> print "$count\t'$word'\n";
KT> } ## end while ( my ( $word, $count...
что значит $words{$_}++; ?
With best regards, Anton Potekhin. E-mail: anton@orbita1.ru
--- ifmail v.2.15dev5.3
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
| Тема: |
Автор: |
Дата: |
|
array |
Anton Potekhin |
01 Feb 2005 10:52:25 |
 Re: array |
Igor Chumak |
01 Feb 2005 12:04:41 |
  Re: array |
Anton Potekhin |
01 Feb 2005 14:21:55 |
 array |
Serguei Trouchelle |
01 Feb 2005 14:31:58 |
|
Re: array |
Anton Potekhin |
01 Feb 2005 16:18:28 |
|
Re: array |
Artem Chuprina |
01 Feb 2005 16:50:01 |
|
Re: array |
Konstantin Tokar |
01 Feb 2005 16:55:07 |
|
Re: array |
Anton Potekhin |
01 Feb 2005 17:24:40 |
|
Re: array |
Artem Chuprina |
01 Feb 2005 17:42:58 |
|
Re: array |
Serge Chervjakov |
01 Feb 2005 17:54:44 |
|
Re: array |
Serge Chervjakov |
01 Feb 2005 18:01:21 |
|
Re: array |
Anton Potekhin |
02 Feb 2005 10:43:18 |
|
array |
Ivan Frolkov |
01 Feb 2005 12:49:33 |
|
Re: array |
Artem Chuprina |
01 Feb 2005 14:34:08 |
|
|
