Select Code to Download

#!/usr/local/bin/perl -w

...

print "params were : $params\n"; # expect to see { v1 => 'abc' ... }

daniel@kinkyboots:~/work/engoi/trunk/Engoi$ ./test_server.pl 
HTTP::Server::Simple: You can connect to your server at http://localho
+st:8000/
...
(Not all processes could be identified, non-owned process info
 will not be shown, you would have to be root to see it all.)
tcp        0      0 localhost:8000          localhost:39238         TI
+ME_WAIT   -