想知道INET的superclass是什么？

程序出错了，追到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(@_);##这一行出错了。
}