Help for this page
package NetServer; use base qw(Net::Server::Fork); ... } NetServer->run(proto => 'ssleay', port=>12345);
print qx( /usr/bin/echo ==== System Command Successful );