blob: efcea293bae744f277391d9fa1fe109e3b63b799 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
#!/usr/bin/perl
use 5.10.1;
use strict;
use warnings;
use File::Basename qw(basename dirname);
use File::Spec::Functions qw(catdir);
use Cwd qw(realpath);
BEGIN {
require lib;
my $dir = realpath( dirname(__FILE__) );
lib->import( $dir, catdir( $dir, 'lib' ), catdir( $dir, qw(local lib perl5) ) );
}
use Mojolicious::Commands;
$ENV{MOJO_LISTEN} ||= $ENV{PORT} ? "http://*:$ENV{PORT}" : "http://*:3001";
# Start command line interface for application
Mojolicious::Commands->start_app('Bugzilla::Quantum');
|