#!/usr/bin/perl

package MyApp;

use base qw/ Web::Easy /;

sub body {
        my $req = shift;
        return $output = "hello world";
}

MyApp->new();
MyApp->setup();