Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w

...
       print $_;
    }
    close($sock);

Select or download this

C:\Code>perl socket.pl
Receiver...
...
This is a test by telnetting to port 7070

C:\Code>