Static Plack Web Server

static.psgi

# run from the directory to be served, with:
#
#     plackup -s Starman -p 5555 static.psgi
#
use strict;
use warnings;
use Plack::App::Directory;
my $static = Plack::App::Directory->new( { root => shift // '.' } )->to_app;
my $app    = sub {
    my $env  = shift;
    my $path = Plack::Request->new($env)->path;
    return
      substr( $path, -1, 1 ) eq "/"
      ? [ 301, [ Location => "${path}index.html" ], [] ]
      : $static->($env);
};