$ # To serve the current directory via http on port 8000, simply do:
$ perl -MApp::SimpleHTTPServer
 
$ # or use the serve_dir script:
$ serve_dir