Plack つかうとこういうの簡単にかけてよい。 use common::sense; use autodie; use Plack::Runner; use Plack::App::Directory; use FindBin; use Filesys::Notify::Simple; use Parallel::Runner; my $docsdir = "$FindBin::Bin/../../docs/"; my $htdocs = "$docsdir/_build/html/"; die "missing $htdocs" unless -d $htdocs; my $runner = Parallel::Runner->new(2); $runner->run(sub { my $app = Plack::App::Directory->new({ root => $htdoc