#!/usr/bin/env perl

use Mojolicious::Lite;

get '/' => sub {
    my ($c) = @_;
    my $fortune = `fortune`;
    
    $c->render(fortune => $fortune)
} => 'index';

get '/me' => sub {
    my ($c) = @_;

    $c->render();
};

get '/news' => sub {
    my ($c) = @_;

    $c->render();
};

app->start();