#!/usr/bin/env perl
use strict;
use Mojolicious::Lite;

get '/' => sub {
my $self = shift;
    $self->respond_to(
        json => {some_key => 'the_value'}
    );
};

app->start;