diff options
Diffstat (limited to 'script/mwrap-rproxy')
-rw-r--r-- | script/mwrap-rproxy | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/script/mwrap-rproxy b/script/mwrap-rproxy index a5572c5..97cca8e 100644 --- a/script/mwrap-rproxy +++ b/script/mwrap-rproxy @@ -3,8 +3,8 @@ # License: GPL-2.0+ <https://www.gnu.org/licenses/gpl-2.0.txt> # thin wrapper for Devel::Mwrap::Rproxy use v5.12; # strict -use Devel::Mwrap::Rproxy; -use Plack::Runner; +eval { require Plack::Runner } or die "Plack not installed: $@\n"; +require Devel::Mwrap::Rproxy; use Getopt::Long qw(:config no_ignore_case no_auto_abbrev pass_through); my $usage = "$0 --socket-dir=/path/to/socket-dir [PLACKUP_OPTIONS]\n"; my $socket_dir; @@ -28,8 +28,7 @@ Inherited socket (fd=3) is non-blocking, making it blocking. $runner->set_options(listen_sock => $s); } } -if ($gz) { - require Plack::Middleware::Deflater; +if ($gz && eval { require Plack::Middleware::Deflater } and !$@) { $app = Plack::Middleware::Deflater->wrap($app); } $runner->run($app); |