Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
#print while (<$socket>);

$socket->close;
  2. or download this
    use strict;
use Data::Dumper;
...
}        

$socket->close;