lots of hacking

1 files changed, 18 insertions, 0 deletions

diff --git a/bugzilla.pl b/bugzilla.pl
new file mode 100755
index 000000000..505b44982
--- /dev/null
+++ b/bugzilla.pl
@@ -0,0 +1,18 @@
+#!/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;
+
+# Start command line interface for application
+Mojolicious::Commands->start_app('Bugzilla::Quantum');