NAME
HTTP::Server::Simple::Static - Serve static files with
HTTP::Server::Simple
SYNOPSIS
my %upload = $r->upload('file');
return unless $upload{mimetype} =~ m|^image/|;
DESCRIPTION
this mixin adds a method to serve static files from your
HTTP::Server::Simple subclass.
METHODS
serve_static
Takes a base directory and a web path, and tries to serve a static
file.
SEE ALSO
AUTHOR
Marcus Ramberg "marcus@thefeed.no" Thanks to Simon Cozens for initial
implementation.
LICENSE
You may distribute this code under the same terms as Perl itself.