Help for this page

Select Code to Download


  1. or download this
     
# default: on
# description: Hello World socket server
...
   log_on_failure  += USERID
   disable         = no
}
  2. or download this
     
#!/usr/bin/perl -w 
# server1.pl - a simple server
...
listen(SERVER, SOMAXCONN) or die "listen failed : $!";
print "Server started on port $port \n";