|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitry E. Oboukhov 2:5020/830.100 04 Mar 2008 11:17:18
To : Artem Chuprina
Subject : нескалярный контекст
--------------------------------------------------------------------------------
AVG>> было бы здорово, если тока не трудно.
AVG>> блин, век живи - век учись.
AC> m//g в скалярном контексте работает следующим образом.
кстати а кто подскажет
иногда надо избавиться от скалярного контекста, а потом все же опять
перейти к скалярному.
например:
my $string="abc abc dhjj abc dhjhdj abc";
нужно посчитать количество вхождений в строку подстроки abc
my $abccount=$string=~/abc/g;
не работает по вышеуказанной причине (ставится закладка а не делается
общее количество сравнений).
скобки тоже не работают
в итоге приходится вставлять фиктивный map:
my $abccount=map {$_} $string=~/abc/g;
а нельзя как-то обойтись без map и без промежуточной переменной @tmp ?
и еще задачка которую все никак не найду как изящно решать
имеется массив @array;
избавляемся от дупов:
{
my %t=map{ ($_, 0) } @array;
@array=keys %t;
}
опять же как такое просто сделать без временной переменной %t?
... Когда я слышу "интеллигенция" всегда хочется добавить "сраная".
--- Mutt/1.5.13 (2006-08-11)
* Origin: Debian GNU Linux (2:5020/830.100)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
