ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : vitus@ice.ru                         2:5020/400     19 Apr 2000  13:53:01
 To : "Dmitriy Goldobin"
 Subject : Re: Знатокам
 -------------------------------------------------------------------------------- 
 

 Dmitriy Goldobin <gold@ems.ru> wrote:
 
 DG>Hi!
 
 DG>Как красиво из списка получить список ссылок на куски исходного
 DG>списка фиксированной длины? То есть, например из
 
 DG>(1,2,3,4,5,6,7,8,9,10,11,12) сделать
 DG>([1,2,3],[4,5,6],[7,8,9],[10,11,12])
 
 DG>Можно это сделать одним оператором без всяких глупых циклов?
 
 Совсем без глупых циклов не получится.
 Если длина совсем фиксированная и маленькая то
 
 while (@in) {
   push @out, [ shift(@in),shift(@in),shift(@in) ];
 } 
 -- 
 --------------------------------------------------
 Victor Wagner      vitus@ice.ru
 Programmer     Office:7-(095)-203-50-60
 Institute for Commerce     Home: 7-(095)-135-46-61
 Engineering                     http://www.ice.ru/~vitus
 --- ifmail v.2.15dev4
  * Origin: AG Telecom news2 server (2:5020/400)
 
 

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