perl的语法问题，已解决，来个人收分，先到多得，多回多得！
感觉perl比shell好混乱。。。
[解决办法]
哦，一点都不懂perl的人路过