Chinaunix

标题: client socket 创建失败 [打印本页]

作者: 609854    时间: 2012-11-30 11:04
标题: client socket 创建失败
本帖最后由 609854 于 2012-11-30 23:33 编辑

帮忙看下 错误的原因,为什么创建不成功
  1. Error creating socket: Unknown error  at C:/Users/
复制代码
  1. use IO::Socket;
  2.   

  3. my $sock        = new IO::Socket::INET(
  4.   
  5.         PeerAddr        => '127.0.0.1',
  6.   
  7.         PeerPort        => 1234,
  8.   
  9.         Proto        => 'tcp',
  10.         
  11.         ) or die "Error creating socket: $! ";
  12.   

  13. close($sock);
复制代码
### 下面是服务器端代码,依然出现创建不了的问题
  1. $sock        = new IO::Socket::INET(
  2.   
  3.         LocalHost        => '127.0.0.1',
  4.   
  5.         LocalPort        => 1234,
  6.   
  7.         Listen        => 1,
  8.   
  9.         Reuse        => 1,
  10.   
  11.         Proto        => 'tcp') || die "Error creating socket: $! ";

  12. $client        = $sock->accept();

  13. close($sock);
复制代码
#### 换了端口号  可以用了~
作者: 兰花仙子    时间: 2012-11-30 11:52
它都说了是Unknown error
就是它自己也不知道
作者: laputa73    时间: 2012-11-30 12:55
server正常吗?
telnet 127.0.0.1 1234试试
作者: 3P用户    时间: 2012-11-30 15:51
本机1234端口上没有Socket侦听,连接被拒绝。你先运行一个服务器在1234端口上。
作者: 3P用户    时间: 2012-11-30 15:56
use IO::Socket;
my $sock = new IO::Socket::INET(
  
        PeerAddr        => 'bbs.chinaunix.net',
  
        PeerPort        => 80,
  
        Proto        => 'tcp',
        
        ) or die "Error creating socket: $! ";
close($sock);

或者连到这里。
作者: 609854    时间: 2012-11-30 23:19
回复 5# 3P用户


    这个是可以创建的




欢迎光临 Chinaunix (http://bbs.chinaunix.net/) Powered by Discuz! X3.2