在perl中对间隔数组进行排序？(Sorting arrays of intervals in perl?)

 我在perl中有一个数组，像下面这样： 
 
 
 
 @array = qw（1-5 7-9 10-15 20-58 123-192 234-256） 
 
 
 我正在尝试使用排序来排序，但这是我获得的结果： 
 
 
 
 1-5，10-15,123-192,20-58,234-256,7-9 
 
 
 它按第一个数字的第一个字符排序......为了获得下一个数组，如何按整个第一个数字排序？ 
 
 
 
 1-5，7-9，10-15，20-58，123-192，234-256 
 
 
 非常感谢你！ 
 
 PS 
 
 我没有代码，我正在尝试命令 
 
my @sorted = sort @array;

I have an array in perl with some intervals like:
 
 
 
@array = qw(1-5 7-9 10-15 20-58 123-192 234-256)
 
 
I am trying to order it using sort but this is what I obtain:
 
 
 
1-5 , 10-15 , 123-192 , 20-58 , 234-256 , 7-9
 
 
It is sorted by the first character of the first number... How can be ordered by the whole first number in order to obtain the next array? 
 
 
 
1-5 , 7-9 , 10-15 , 20-58 , 123-192 , 234-256
 
 
Thank you very much!
 
P.S. 
 
I have no code for this, I am trying the command 
 
my @sorted = sort @array;

原文：https://stackoverflow.com/questions/27089498