Forum Webscript.Ru
		Программирование => Perl => Тема начата:  от 13 Января 2002, 00:13:55
		
			
			- 
				Народ как отсортировать массив чисел по возрастанию в Perl... очень срочно нужно... я понимаю что есть sort фунция но как она работает незнаю... прошу напишите подробно!
			
- 
				@x = sort (@y);
			
- 
				Да но он сортирует это так...
 Пример:
 1 10 11 12  4 47 6 9
 вот!
 а нада все подряд!
- 
				@x = sort (@y); 
 Это не совсем верно для числовой сортировки,
 вернее так:
 @sorted = sort { $a <=> $b } @Unsorted;
- 
				Слушай посмотри ман там есть функция которая сортирует натуральным алгоритмом. Помню на sort начинается :)
 т.е. 1а 11 а 13а  и т.д. и т.п.
- 
				@by_num= sort {$a<=>$b} @erunda;#для чисел
 @by_sym=sort {$a cmp $b} @erunda;#для строк
- 
				тоже самое. нужно отстортировать значения по возрастанию
 подозреваю нужно использовать sort values, но как?
- 
				тоже самое. нужно отстортировать значения по возрастанию  
 
 map {print "$_ => $hash{$_}\\n"} sort {$hash{$a}<=>$hash{$b}} keys %hash;