Help for this page

Select Code to Download

Select or download this

$ perl -MIO::Socket::INET -E'say IO::Socket::INET->new(LocalPort=>6969
+, Listen=>1)->accept->peerhost'
192.168.3.58