小编Sta*_*cky的帖子

我需要对数字进行排序,但我无法按照我想要的方式工作.

输入示例:

15.12
16.1
15.2
15.1

预期产量:

15.1
15.2
15.12
16.1

我尝试了正常的排序,也Sort::Naturally为此.两者都没有给我预期的输出.

我也知道我可以按照以下方式进行排序,以我想要的方式对其进行排序.

my @sorted =
map sprintf('%vd', $_),
sort
map join('', map chr, split /\./),
@data;

我想知道是否有一些我可以使用的预先存在的模块.

提前致谢.