use strict;
use warnings;
use lib '.';
use Plack::Builder
    ;    # Plackで使うミドルウェアを簡単に追加できるDSL

# mojo generate lite_app
# でmyapp.plを作っておく

# http://localhost:5000/alice でHello alice と表示
# http://localhost:5000/mojo  でmojoliciousのいつもの画面


my $app = sub {
    return [ 200, [], ["Hello alice"] ];
};

builder {
    mount '/alice' => $app;
    mount '/mojo'  => builder {
        require 'myapp.pl'
    };
}