<div>perl不熟，最近有空开始尝试用IO::Socket模块建立通讯</div>
<div>碰到问题server和client端可以建立连接，但是server端收不到client发的数据</div>
<div>请帮忙看看是哪里出了问题啊?</div>
<div>server code:</div>
<div>use IO::Socket;<br>$sock = new IO::Socket::INET (LocalAddr => 'software01',<br> LocalPort => 4455,<br> Proto => 'tcp',<br> Listen => 5);<br>
die "$!" unless $sock;<br>$success_accept = $sock->accept();<br>$receive = $sock->recv($data,100,0);</div>
<div> </div>
<div>client code:</div>
<div>use IO::Socket;<br>$sock = new IO::Socket::INET (PeerAddr => 'software01',<br> PeerPort => 4455,<br> Proto => 'tcp');<br>die "$!" unless $sock;<br>
$success_send = $sock->send("asdf") or print "connection closed at other end";<br><br> </div>
<div><span class="gmail_quote">在08-1-31，<b class="gmail_sendername">tiger peng</b> <<a href="mailto:tigerpeng2001@yahoo.com">tigerpeng2001@yahoo.com</a>> 写道：</span>
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">
<div>
<div style="FONT-SIZE: 10pt; FONT-FAMILY: courier,monaco,monospace,sans-serif">
<div style="FONT-SIZE: 10pt; FONT-FAMILY: courier,monaco,monospace,sans-serif">Be careful! Someone else may 监听你的请求/密码.<br><br>
<div style="FONT-SIZE: 12pt; FONT-FAMILY: times new roman,new york,times,serif"><span class="q">----- Original Message ----<br>From: truncatei <<a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:truncatei@gmail.com" target="_blank">truncatei@gmail.com</a>><br>
To: <a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:china-pm@pm.org" target="_blank">china-pm@pm.org</a><br></span><span class="q">Sent: Wednesday, January 30, 2008 9:47:08 PM<br>Subject: Re: [PerlChina] 求助如何可以读取邮箱中邮件啊<br>
<br></span>
<div><span class="e" id="q_117d02d0b4c843fd_3">Perl可以写服务器程序的，看看IO:Socket模块。<br>
<ol>
<li>在服务器上创建一个服务器进程，一直监听来自某个端口的请求
<li>客户端发起请求，连接到步骤1中使用的端口，连接成功后发送一些数据，比如密码和需要执行的命令
<li>服务器端收到客户的请求数据，验证密码，通过system调用执行命令，返回状态给客户端，如果可以取到运行后的结果数据，返回数据
<li>数据传输格式自己定义，客户端和服务器都遵守约定就好<br></li></li></li></li></ol><br>
<div class="gmail_quote">2008/1/31 Steven Zhu <<a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:stevenzyk@gmail.com" target="_blank" rel="nofollow">stevenzyk@gmail.com</a>>:<br>
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0pt 0pt 0pt 0.8ex; BORDER-LEFT: rgb(204,204,204) 1px solid">
<div>这样的话太麻烦了，你所说的监听这个如何做哪，是否可以提供个思路或者例子啊?</div>
<div>perl不是很熟，呵呵，谢谢!<br> </div></blockquote></div><br><br clear="all"><br>-- <br>如果觉得无聊，您不妨访问Google Reader消遣 <a onclick="return top.js.OpenExtLink(window,event,this)" href="http://www.google.com/reader/view" target="_blank" rel="nofollow">http://www.google.com/reader/view</a><br>
要尝试黑版本Google，请访问 <a onclick="return top.js.OpenExtLink(window,event,this)" href="http://www.google.com/custom?q=&sa=Search&client=pub-4021907304270164&forid=1&channel=7519554017&ie=UTF-8&oe=UTF-8&cof=GALT%3A%23FF9900%3BGL%3A1%3BDIV%3A%230033FF%3BVLC%3ACC9900%3BAH%3Acenter%3BBGC%3A000000%3BLBGC%3A000000%3BALC%3AFFFFFF%3BLC%3AFFFFFF%3BT%3ACCCCCC%3BGFNT%3A33CC00%3BGIMP%3A33CC00%3BFORID%3A1%3B&hl=en" target="_blank" rel="nofollow">http://www.google.com/custom?q=&sa=Search&client=pub-4021907304270164&forid=1&channel=7519554017&ie=UTF-8&oe=UTF-8&cof=GALT%3A%23FF9900%3BGL%3A1%3BDIV%3A%230033FF%3BVLC%3ACC9900%3BAH%3Acenter%3BBGC%3A000000%3BLBGC%3A000000%3BALC%3AFFFFFF%3BLC%3AFFFFFF%3BT%3ACCCCCC%3BGFNT%3A33CC00%3BGIMP%3A33CC00%3BFORID%3A1%3B&hl=en</a> </span></div>
<div><br><br>-----Inline Attachment Follows-----<span class="q"><br><br>_______________________________________________<br>China-pm mailing list<br><a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:China-pm@pm.org" target="_blank">China-pm@pm.org</a><br>
<a onclick="return top.js.OpenExtLink(window,event,this)" href="http://mail.pm.org/mailman/listinfo/china-pm" target="_blank">http://mail.pm.org/mailman/listinfo/china-pm</a></span></div></div><br> </div></div></div><br>_______________________________________________<br>
China-pm mailing list<br><a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:China-pm@pm.org">China-pm@pm.org</a><br><a onclick="return top.js.OpenExtLink(window,event,this)" href="http://mail.pm.org/mailman/listinfo/china-pm" target="_blank">http://mail.pm.org/mailman/listinfo/china-pm</a><br>
</blockquote></div><br><br clear="all"><br>-- <br>BR<br>Steven.zhu