wT3GQnICgcWVV4XGtiIB2 changeset
Changeset | 306133343635 (b) |
---|---|
Parent | None (a) |
a | b | ||
---|---|---|---|
0 | + | #!/usr/bin/env perl | |
0 | + | use strict; | |
0 | + | use Mojolicious::Lite; | |
0 | + | ||
0 | + | get '/' => sub { | |
0 | + | my $self = shift; | |
0 | + | $self->respond_to( | |
0 | + | json => {some_key => 'the_value'} | |
0 | + | ); | |
0 | + | }; | |
0 | + | ||
0 | + | app->start; | |
... |
|
|