There is App::HTTPThis, which does just that.
In reply to Re: perl one-liner to serve httpd current directory by Corion in thread perl one-liner to serve httpd current directory by Galdor