Help for this page

Select Code to Download


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

use strict;
...

}
}
  2. or download this
    #!/usr/bin/perl 
use strict;

...
) or die "cannot create a socket $@\n";

print "TCP Connection Creatred Sucessfully\n";