The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"Cортировка в Perl"
Вариант для распечатки Архивированная нить - только для чтения! 
Пред. тема | След. тема 
Форумы Программирование под UNIX (Public)
Изначальное сообщение [Проследить за развитием треда]

"Cортировка в Perl"
Сообщение от Igor Искать по авторуВ закладки(??) on 24-Июн-04, 13:09  (MSK)
Помогите пожалуйста найти решение:
есть массив из 20 чисел, если его отсортировать, то получится
следующий результат:
@tarr =(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20);
foreach $i (sort @tarr) { print "$i\n"; }

1
10
11
12
13
14
15
16
17
18
19
2
20
3
4
5
6
7
8
9


А нужно что бы было:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Большое спасибо.

  Рекомендовать в FAQ | Cообщить модератору | Наверх

 Оглавление

Индекс форумов | Темы | Пред. тема | След. тема
Сообщения по теме

1. "Cортировка в Perl"
Сообщение от Igor Искать по авторуВ закладки(??) on 24-Июн-04, 13:26  (MSK)
Поспешил спросить :)

Нашел решение:
foreach $i (sort {$a <=> $b} @tarr) { print "$i\n"; }

Cпасибо :)

  Рекомендовать в FAQ | Cообщить модератору | Наверх


Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру