Help for this page
#!/usr/bin/perl -w # server2way.pl - a server that reads from ...
#!/usr/bin/perl -w ... close $sock;