perl按照字符串长度进行排序，sort函数的示例

时间 2019-12-11 标签 perl 按照字符串长度进行排序 sort 函数示例

## rank by len print join("\n",sort sort_by_len keys %chn_hash); sub sort_by_len { if(length($a) < length($b)) {-1} elsif (length($a) > length($b)) {1} else {0} }