Search files through multiple directories

# via: http://search.cpan.org/~miyagawa/Plack-1.0029/lib/Plack/App/Cascade.pm
use Plack::App::Cascade;
use Plack::App::File;
use Plack::A pp::URLMap;

my $cascade = Plack::App::Cascade->new;
$cascade->add(
    Plack::App::File->new(root => '/path/to/dir1')->to_app,
    Plack::App::File->new(root => '/path/to/dir2')->to_app,
);

my $map = Plack::App::URLMap->new;
$map->mount('/' => $cascade);
$map->to_app;

Simple file server

# via: http://blog.64p.org/entry/20091216/1260966299
plackup  -e 'use Plack::App::Directory; Plack::App::Directory->new(root=>q/./)->to_app'