Help for this page
#!/usr/bin/perl -w use strict; ... } close($sock); exit(0);
#!/usr/bin/perl -w use Socket; # For constants like AF_INET and SOCK_STREAM ... exit(0); } exit(0);