around_dispatch.pl

#!/opt/perl

use Mojolicious::Lite;

get '/' => sub {
    my $self = shift;

    die("Here") if $self->param("exception");

    $self->render("slash");
};

hook around_dispatch => sub {
    my ($next, $c) = @_;

    eval {
        $next->();
    };
    if ($@) {
        $c->render("exception", msg => $@);
    }
};

app->start;

__DATA__

@@ slash.html.ep
Hello world.

@@ exception.html.ep
It exploded.

<%= $msg %>