feat: add basic skeleton app
This commit is contained in:
12
bin/urupam
Executable file
12
bin/urupam
Executable file
@@ -0,0 +1,12 @@
|
|||||||
|
#!/usr/bin/env perl
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
|
use FindBin;
|
||||||
|
use lib "$FindBin::Bin/../lib";
|
||||||
|
|
||||||
|
use Urupam::App;
|
||||||
|
|
||||||
|
my $app = Urupam::App->new();
|
||||||
|
|
||||||
|
$app->start();
|
||||||
19
lib/Urupam/App.pm
Normal file
19
lib/Urupam/App.pm
Normal file
@@ -0,0 +1,19 @@
|
|||||||
|
package Urupam::App;
|
||||||
|
|
||||||
|
use Mojo::Base 'Mojolicious';
|
||||||
|
use Moose;
|
||||||
|
|
||||||
|
sub startup {
|
||||||
|
my $self = shift;
|
||||||
|
|
||||||
|
my $r = $self->routes;
|
||||||
|
$r->get('/')->to(
|
||||||
|
cb => sub {
|
||||||
|
my $c = shift;
|
||||||
|
$c->render( text => 'Hello from urupam!' );
|
||||||
|
}
|
||||||
|
);
|
||||||
|
}
|
||||||
|
|
||||||
|
1;
|
||||||
|
|
||||||
Reference in New Issue
Block a user