ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Oleg Demidovich                      2:450/124.25   09 Apr 2002  13:02:24
 To : Vilfred
 Subject : Re: реализация связных списков
 -------------------------------------------------------------------------------- 
 

 >>>>> On Mon, 08 Apr 2002 09:32:09 +0300 "v" == vilfred wrote:
 
  v> натолкнулся на www.linux.org.ru на вопрос в
  v> ++++++++++++++++++++++++++++++++++++++++
  v> связный список на перле
  v> Hужно очень срочно написать связный список на
  v> перле. Самый стандартный вариант, как на си и
  v> паскале, как бы странно это ни казалось. Hо не
  v> получается:(( Hужно просто в цикле добавлять туда
  v> элементы.
  v> Hаписал так:
 
  v> $top={};
  v> while (1)
  v> {
  v> # $a=<STDIN>;
  v> if (($a=<STDIN>)==999) {last}
  v> else
  v> {
 
  v> $list{'num'}=$a;
  v> $list{'next'}=$top;
  v> $q=\%list;
  v> $top=$q;
 
   Вместо этих четырёх строк:
 chomp $a;
 $top={num => $a,
       next => $top};
 
  v> }
 
  v> Что неправильно??
 
 perldoc perldata
 perldoc perlref
 
 -- 
 WBR, Oleg.
 --- Gnus/5.090006 (Oort Gnus v0.06) XEmacs/21.4 (Common Lisp, i586-pc-linux)
  * Origin: In Gnus we trust (2:450/124.25)
 
 

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

Тема:    Автор:    Дата:    аналог БД   Rostislav Podgornyi   24 Apr 2002 23:21:25   Re: аналог БД   Sergey V. Leschenko   26 Apr 2002 11:01:01   Re: реализация связных списков   Oleg Demidovich   09 Apr 2002 13:02:24