Initial commit
[nethack-naodash.git] / app.psgi
1 #!/usr/bin/perl
2 use 5.014000;
3 use warnings;
4
5 use App::Web::NAOdash;
6 use Plack::Builder;
7
8 builder {
9 mount '/dash/' => App::Web::NAOdash->new->to_app;
10 mount '/json/' => App::Web::NAOdash->new(json => 1)->to_app;
11 mount '/ok' => sub { [200, [], []] };
12 mount '/' => sub { App::Web::NAOdash::reply(404, 'Try /dash/USERNAME or /json/USERNAME')};
13 }
This page took 0.02331 seconds and 4 git commands to generate.