Yet Another CPAN Grep

Catalyst-Controller-DirectoryDispatch ( A/AG/AGORMAN/Catalyst-Controller-DirectoryDispatch-1.03.tar.gz, AGORMAN, 2016; MetaCPAN )

Catalyst-Controller-DirectoryDispatch/lib/Catalyst/Controller/DirectoryDispatch.pm ( view source; MetaCPAN )

;
BEGIN { extends 'Catalyst::Controller' }

use JSON;
use Try::Tiny;
use namespace::autoclean;

__PACKAGE__->config(
    'default'   => 'application/json',
    'stash_key' => 'response',
    'map'

   => {
        'application/x-www-form-urlencoded' => 'JSON',
        'application/json'                  => 'JSON',
    }
);

has 'root' => (
    is      => 'ro',
    isa     => 'Str',
    default =

e} = {
            "error"   => "Failed to open directory '$full_path'",
            "success" => JSON::false,
        };
        $c->detach('serialize');
    };

    my $regexp = $self->filter;
    @