ソート機能perlの

Question

では正常に動作していない私は

4 
1 7 8 100 

間違っている

1 100 7 8 

だった私が得た出力と入力を与えた

$number = <>;      # get the number of numbers 
$values = <STDIN>;     # accept number separated by spaces 

@num = split(" ", $values); # split the number separated by spaces 
@num = sort @num; 

for ($i = 0; $i < $number; $i++) { 
    print $num[$i], "\n"; 
} 

Perlプログラムを書いた

Answer 1

@num=sort { $a <=> $b } @num; 

あなたが望むものを生み出します。関連するドキュメントのページを見て：http://perldoc.perl.org/functions/sort.html

あなたが望むようSUBNAMEやBLOCKを省略するとそれは

ので、並べ替えしない、標準の文字列比較順序でソートします。

文書に従って！