概述
找一个简单的Perl Socket程序,如下Server程序,运行它
while(<CLIENT>){
chomp;
print "Message From Client: $_/n";
print CLIENT $_;
}
你将发现,server端程序无法发送信息到client,程序阻塞无法继续运行。
解决方法:
use Socket qw(:DEFAULT :crlf);
......
while(<CLIENT>){
chomp;
print "Message From Client: $_/n";
$_ .= CRLF;
print CLIENT $_;
}
原因:
一切都是CRLF,不同系统使用不同的换行符引起的
最后
以上就是跳跃棒棒糖为你收集整理的Perl Socket CRLF的全部内容,希望文章能够帮你解决Perl Socket CRLF所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错,欢迎将靠谱客网站推荐给程序员好友。
本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
发表评论 取消回复