想知道INET的superclass是什么？

visa_li

程序出错了，追到IO::Socket::INET.pm 的new()的最后一行。 发现是$class->SUPER::new(@_); 返回了错误。 苦于不知道 IO::Socket::INET.pm 的superclass是哪个，工作中断中。

IO::Socket::INET.pm 的new() fuction 内容如下。
sub new {
    my $class = shift;
   print "@_\n$class\n"; #我加的输入语句。
    unshift(@_, "PeerAddr") if @_ == 1;
    print "before return \n @_\n";
    return $class->SUPER::new(@_);##这一行出错了。
}

flw

1. flw@debian:~$ perl -MIO::Socket::INET -E 'say "@IO::Socket::INET::ISA"'
   
2. IO::Socket
   
3. flw@debian:~$ perl -MIO::Socket::INET -E 'say "@IO::Socket::ISA"'
   
4. IO::Handle
   
5. flw@debian:~$ perl -MIO::Socket::INET -E 'say "@IO::Handle::ISA"'
   
6. Exporter
   
7. flw@debian:~$ perl -MIO::Socket::INET -E 'say "@Exporter::ISA"'
   
8. 
   
9. flw@debian:~$

复制代码