HTTP::Server::Simple::UseriContributed Perl DocHTTP::Server::Simple::Static(3)NAMEHTTP::Server::Simple::Static - Serve static files with
HTTP::Server::Simple
VERSION
This documentation refers to HTTP::Server::Simple::Static version 0.07
SYNOPSIS
package MyServer;
use base qw(HTTP::Server::Simple::CGI);
use HTTP::Server::Simple::Static;
sub handle_request {
my ( $self, $cgi ) = @_;
return $self->serve_static( $cgi, $webroot );
}
package main;
my $server = MyServer->new();
$server->run();
DESCRIPTION
this mixin adds a method to serve static files from your
HTTP::Server::Simple subclass.
SUBROUTINES/METHODS
serve_static
Takes a base directory and a web path, and tries to serve a static
file. Returns 0 if the file does not exist, returns 1 on success.
BUGS AND LIMITATIONS
Bugs or wishlist requests should be submitted via http://rt.cpan.org/
SEE ALSOAUTHOR
Stephen Quinney "sjq-perl@jadevine.org.uk"
Thanks to Marcus Ramberg "marcus@thefeed.no" and Simon Cozens for
initial implementation.
LICENSE AND COPYRIGHT
Copyright 2006 - 2008. Stephen Quinney "sjq-perl@jadevine.org.uk"
You may distribute this code under the same terms as Perl itself.
perl v5.14.1 2008-03-19 HTTP::Server::Simple::Static(3)