The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Mojolicious::Plugin::Directory - Serve static files from document root with directory index

SYNOPSIS

# simple usage
use Mojolicious::Lite;
plugin( 'Directory', root => "/path/to/htdocs" )->start;

# with handler
use Text::Markdown qw{ markdown };
use Path::Class;
use Encode qw{ decode_utf8 };
plugin('Directory', root => "/path/to/htdocs", handler => sub {
    my ($c, $path) = @_;
    if ($path =~ /\.(md|mkdn)$/) {
        my $text = file($path)->slurp;
        my $html = markdown( decode_utf8($text) );
        $c->render( inline => $html );
    }
})->start;

or

> perl -Mojo -E 'a->plugin("Directory", root => "/path/to/htdocs")->start' daemon

DESCRIPTION

Mojolicious::Plugin::Directory is a static file server directory index a la Apache's mod_autoindex.

METHODS

Mojolicious::Plugin::Process inherits all methods from Mojolicios::Plugin.

OPTIONS

Mojolicious::Plugin::Directory supports the following options.

root

# Mojolicious::Lite
plugin Directory => { root => "/path/to/htdocs" };

Document root directory. Defaults to the current directory.

if root is a file, serve only root file.

dir_page

# Mojolicious::Lite
plugin Directory => { dir_page => $template_str };

a HTML template of index page

handler

# Mojolicious::Lite
use Text::Markdown qw{ markdown };
use Path::Class;
use Encode qw{ decode_utf8 };
plugin Directory => {
    handler => sub {
        my ($c, $path) = @_;
        if ($path =~ /\.(md|mkdn)$/) {
            my $text = file($path)->slurp;
            my $html = markdown( decode_utf8($text) );
            $c->render( inline => $html );
        }
    }
};

CODEREF for handle a request file.

if not rendered in CODEREF, serve as static file.

AUTHOR

hayajo <hayajo@cpan.org>

SEE ALSO

Plack::App::Directory

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.