ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Andrey Sapozhnikov                   2:5020/400     19 Apr 2000  16:41:43
 To : All
 Subject : Re: Знатокам
 -------------------------------------------------------------------------------- 
 

 frolcov@solaster.fintech.ru wrote:
 
 > Andrey Sapozhnikov <sapa@chelindbank.ru> wrote:
 > > или @b=map { [splice(@a,0,3)] } (1..@a/3);
 > Hе, так не пойдет - если число элементов не делится на три, то последние
 > пропадут.
 
 Как это "не делится на три"? В условиях ничего не оговаривалось
 что делать. Дополнять undef-ами, не учитывать остаток или
 генерировать элемент как ссылку на более короткий массив.
 
 Впрочем,
 
 @b=map { [splice(@a,0,3)] } (0..$#a/3);
 
 теперь устроит?
 
 Андрей
 --- ifmail v.2.15dev4
  * Origin: Chelindbank (2:5020/400)
 
 

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