The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

use Cwd;
use Plack::App::Directory;
my $app = Plack::App::Directory->new(root => Cwd::cwd)->to_app;