use version;
my @version = ( "1.2.3", "1.3.4", "1.2.31", "1.12", "1.12.1", "1.12.12
+" );
@version =
  map { $_->[1] } sort { $a->[0] cmp $b->[0] } map { [ qv($_), $_ ] } 
+@version;
__OUTPUT__
1.2.3, 1.2.31, 1.3.4, 1.12, 1.12.1, 1.12.12
[download]