Ｐｅａｌでソート（多分出来る人には簡単な事だと思います）

質問

HTMLフォームからdata_aとdata_bのデータを取得します。
data_aには"1,6,7,9,10,11,12,13,14"という値が、data_bには"3,5,8"という値が入っているとします。
そこで、この2つのデータを連結して、ソートしようと思って次の様なコードを書いたのですが、

#! /usr/bin/perl
$data_a=$in{'data_a'};
$data_b=$in{'data_b'};
$renketu=$data_a.",".$data_b;
@list = ($renketu);
@result = sort { $a <=> $b } @list;
print @result;

結果は、1,6,7,9,10,11,12,13,14,3,5,8とソートされません。どうしたら1,3,5,6,7,8,9,10,11,12,13,14となるように出来るでしょう。

回答No.1

Sucelggug（@xyz37005） · ベストアンサー

@list = ($renketu);
のままでは$list[ 0 ]に"1,6,7,9,10,11,12,13,14,3,5,8"が入ってるだけです。
@list = split( /,/ , $renketu);
としましょう。

お礼

あっそうか！なるほど・・・できましたできました。
ありがとうございました。