12345678910111213141516171819202122232425 |
- #!/usr/bin/perl
- use local::lib;
- use v5.10;
- use strict;
- use warnings;
- use FindBin qw( $RealBin );
- use lib "$RealBin/lib";
- BEGIN { $ENV{TZ} = 'UTC' }
- use Mojo::Server::Hypnotoad ();
- use Mojo::Util qw( getopt );
- #<<<
- getopt
- 'redirector' => \$ENV{LOGBOT_REDIRECT},
- 'default=s' => \$ENV{LOGBOT_DEFAULT_NETWORK},
- 'pid-file=s' => \$ENV{LOGBOT_PID_FILE},
- 'listen-port=i' => \$ENV{LOGBOT_PORT},
- 'stop' => \$ENV{HYPNOTOAD_STOP};
- #>>>
- chdir($RealBin);
- Mojo::Server::Hypnotoad->new->run($ENV{LOGBOT_REDIRECT} ? 'logbot-redirect' : 'logbot-web');
|