1.实现基于tcp的客户端脚本，照抄 perl网络编程16.1节gab7.pl脚本