【方法3：Perl版本】删除Map中Value重复的记录，并且只保留Key最小的那条记录

icemouse210写了一个perl版本的，发挥了脚本高度封装的优势。我把代码贴出来，供大家参考分享。