perl关闭一个socket

是否有区别？

shutdown($socket,0) if $socket;
shutdown($socket,2) if $socket;
close($socket) if $socket;

和

shutdown($socket,2) if $socket;
close($socket) if $socket;

也有区别

shutdown($socket,1) if $socket;
shutdown($socket,2) if $socket;
close($socket) if $socket;

最后还是需要关闭吗？

解决方法

shutdown使TCP连接的一端停止读取(0)或写入(1)或两者(2).所以前两个片段的效果与下一个相同.

关机不释放文件描述符,因此仍然需要close.

在关闭(fd,2)之前的单个关闭和一个之间的区别在于,在第二种情况下,TCP不会尝试将未完成的数据提供给远程端(参见SO_LINGER).