in reply to perl one-liner to serve httpd current directory
There is App::HTTPThis, which does just that.