ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Ilya Anfimov                         2:5020/400     09 Jan 2007  11:53:45
 To : Nikolay Pichtin
 Subject : Re: Опять сортировка
 -------------------------------------------------------------------------------- 
 

 2007-01-06, Nikolay Pichtin <Nikolay.Pichtin@f30.n5056.z2.fidonet.org> пишет:
 
 >                            Добрый вечер All !
 >
 >  Есть хеш
 > При переборе необходимо отсортировать
 > foreach my $tmp (keys %{$self->{par1}->{par2}}) {
 >  print "$tmp\n";
 > }
 > В $tmp получаются числа от 1..200
 > Hадо отсортировать по значению в $tmp
 > Пробовал sort {$a <=> $b}, sort{$self{$a} <=> $self{$b}}
 > Hе проходит.
 >
 
  И что у Вас таки непроходит?
 
 perl -e ' for my $i (1..200) { $hash{$i} = $i } foreach my $tmp (sort {$a <=> $b
 } keys %hash) { print $tmp."\n" } '
 
  Работает замечательно -- выдаёт числа от 1 до 200
 
 >
 > * Политики всегда думают о народе, но никогда не говорят, что именно.
 > ::Hиколай
 > ----------------------------------------------------------------------
 
 --- ifmail v.2.15dev5.3
  * Origin: Demos online service (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Опять сортировка   Nikolay Pichtin   06 Jan 2007 23:33:44   Re: Опять сортировка   Ilya Anfimov   09 Jan 2007 11:53:45   Re: Опять сортировка   Andrew Alakozow   09 Jan 2007 11:53:23