package App::MojoApp::Command::hypno;
use Mojo::Base 'Mojolicious::Command';
use Mojo::Server::Hypnotoad;
has description => 'Run app on hypnotoad production server';
has usage => "Usage: APPLICATION hypno";
sub run {
my ($self, @args) = @_;
my $p = __PACKAGE__;
my @s = split(/::/, $p);
$p = join('::', $s[0], $s[1]);
$p =~ s/::/\//g;
$p =~ s/$/.pm/;
my $hypnotoad = Mojo::Server::Hypnotoad->new;
$hypnotoad->run($INC{$p});
}
1;