blob: 41a4d8e6a7f52f664675266692b588d6cc013e75 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
#!/usr/bin/env 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');
|