e Plack::Util::Accessor qw( dirs filter wait );
use AnyEvent;
use AnyEvent::Filesys::Notify;
use JSON::Any;
use File::Slurp;
use File::ShareDir qw(dist_file);
use File::Basename;
use Carp;
use Readon
ents as json
sub _respond {
my ( $self, $resp ) = @_;
## TODO: check that resp is a hash ref
return [
200,
[ 'Content-Type' => 'application/json' ],
[ JSON::Any->n