摘要： 1）记得刚开始写perl的时候，对于一个功能，总是拿目前能用的数据类型来解决问题，不想想有没有更好的，能用能解决问题就好，这就导致了后期，要在函数里面添加功能的时候，函数要添加很多参数，一个函数有7、8个参数，并且这些参数都是有关系的，sub is_healthy{ my ($name, $s... 阅读全文