File Coverage

examples/hello-world/app.psgi

Criterion	Covered	Total	%
statement	20	20	100.0
branch			n/a
condition			n/a
subroutine	8	8	100.0
pod			n/a
total	28	28	100.0

#!perl

use strict;
use warnings;

use Web::Machine;

{
    package HelloWorld::Resource;
    use strict;
    use warnings;

    use parent 'Web::Machine::Resource';

    sub content_types_provided { [{ 'text/html' => 'to_html' }] }

    sub to_html {
        join "" =>
        '',
            '',
                'Hello World Resource',
            '',
            '',
                'Hello World',
            '',
        ''
    }
}

Web::Machine->new( resource => 'HelloWorld::Resource' )->to_app;