求：perl下socket连接异常的处理方法

mzgcz

use Socket;
有什么常用的socket连接异常的处理方法么？例如异常断开、远端没有相应……
求简单示例代码

cuteorange

eval + $@ 不行吗

mzgcz

回复 2# cuteorange


    是的，可以；之前写的都是些理想代码，还没用过eval~

不过这里对socket连接返回的错误分析得依赖$@了，perl下有没有对应错误的error no信息呢？