… | |
… | |
168 | sub setsockopt { setsockopt tied(${$_[0]})->[0], $_[1], $_[2], $_[3] } |
168 | sub setsockopt { setsockopt tied(${$_[0]})->[0], $_[1], $_[2], $_[3] } |
169 | sub send { send tied(${$_[0]})->[0], $_[1], $_[2], @_ > 2 ? $_[3] : () } |
169 | sub send { send tied(${$_[0]})->[0], $_[1], $_[2], @_ > 2 ? $_[3] : () } |
170 | sub recv { recv tied(${$_[0]})->[0], $_[1], $_[2], @_ > 2 ? $_[3] : () } |
170 | sub recv { recv tied(${$_[0]})->[0], $_[1], $_[2], @_ > 2 ? $_[3] : () } |
171 | sub sockname { getsockname tied(${$_[0]})->[0] } |
171 | sub sockname { getsockname tied(${$_[0]})->[0] } |
172 | sub peername { getpeername tied(${$_[0]})->[0] } |
172 | sub peername { getpeername tied(${$_[0]})->[0] } |
173 | sub shutdown { shutdown tied(${$_[0]})->[0] } |
173 | sub shutdown { shutdown tied(${$_[0]})->[0], $_[1] } |
174 | |
174 | |
175 | =item ($peername, $fh) = $listen_fh->accept |
175 | =item ($peername, $fh) = $listen_fh->accept |
176 | |
176 | |
177 | In scalar context, returns the newly accepted socket (or undef) and in |
177 | In scalar context, returns the newly accepted socket (or undef) and in |
178 | list context return the ($fh, $peername) pair (or nothing). |
178 | list context return the ($fh, $peername) pair (or nothing). |