[問題] 請問個排序的問題
就是今天我有個排序的題目 可是我不用 sort ($a <=> $b) 下去做
我要把我給的幾個數給排序
想法是(假如有四個) 兩兩相比 找出第一個最小的 然後刪掉
剩下三個在繼續比較.....一直到結束
這重複過程就用sub來做
===================================================
#!/usr/bin/perl
print "請輸入你要排序的數字,輸入完成請按ctrl+d結束\n";
chomp (@data = <STDIN>);
open(FILE,">data\n");
print FILE "@data";
close(FILE);
my @input = @data;
my @out = sort { $a <=> $b } @input;
open(FILE,">output");
print FILE "@out\n";
close(FILE);
這些是我sort寫出來的
希望知道的高手可以教一下 !!!!感謝!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
※ 編輯: liwei0321 來自: 140.113.223.181 (06/11 02:22)
討論串 (同標題文章)
以下文章回應了本文：
完整討論串 (本文為第 1 之 3 篇)：
Perl 近期熱門文章
PTT數位生活區 即時熱門文章