#!/usr/bin/env perl
use Mojolicious::Lite;
use Time::HiRes 'time';
use FindBin qw($Bin);
use lib "$Bin/lib";

my $startup = time;

plugin Config => {file => "$Bin/my-hello-app.beta.conf"};

helper storage => sub {
    # instantiate a storage class; filesystem, database, or in-memory based on config...
    # As long as the present the same interface, it doesn't matter.
};

helper useragent => sub {return state $ua = Mojo::UserAgent->new;};

helper myhello => sub {
    my $c = shift;

    return state $hello_obj = do {
        require Model::Hello;
        Model::Hello->new(
            storage     => $c->storage,
            ua          => $c->useragent,
        );
    };
};

get '/hello' => sub {
    my $c = shift;
    $c->render(json => $c->myhello->hello);
};

get '/_live' => sub { shift->render( json => { alive_since => (time - $startup) } ) };

app->start;