12 lines
274 B
Perl
12 lines
274 B
Perl
|
#!/usr/bin/perl
|
||
|
use strict;
|
||
|
use warnings;
|
||
|
# run with
|
||
|
# placnup <script file>
|
||
|
# Serve static files from document root with a directory index
|
||
|
# app.psgi
|
||
|
use Plack::App::Directory;
|
||
|
my $app = Plack::App::Directory->new({
|
||
|
root => "./"
|
||
|
})->to_app;
|