作者ultra400 (阿志)
看板perl
标题Re: [问题] 双层比较
时间Sat Feb 10 10:58:25 2007
※ 引述《abliou (Art of Life)》之铭言：
: ※ 引述《ultra400 (阿志)》之铭言：
: : 假如我有一堆数字如：
: : 10.6
: : 11.6
: : 10.5
: : 11.5
: : 10.10
: : 11.10
: : 想要按顺序排成：
: : 10.5
: : 10.6
: : 10.10
: : 11.5
: : 11.6
: : 11.10
: : 的话，要如何排呢？
: @a=("10.6","11.6","10.5","11.5","10.10","11.10");
: @b= sort version @a;
: print $_.$/ for @b;
: sub version{
: ($a1,$a2)=$a=~/(\d+).(\d+)/;
: ($b1,$b2)=$b=~/(\d+).(\d+)/;
: $a1<=>$b1 or $a2<=>$b2 ;
: }
喔，成功了，感谢 ！
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.231.78.133