use strict;
use base 'Catalyst::Engine::CGI';
-use FCGI;
+eval "use FCGI";
+die "Please install FCGI\n" if $@;
=head1 NAME
}
$options ||= {};
-
+
my %env;
my $request =
);
my $proc_manager;
-
- if ( $listen ) {
+
+ if ($listen) {
require FCGI::ProcManager;
$options->{nproc} ||= 1;
-
- $proc_manager
- = FCGI::ProcManager->new( { n_processes => $options->{nproc} } );
-
+
+ $proc_manager =
+ FCGI::ProcManager->new( { n_processes => $options->{nproc} } );
+
if ( $options->{pidfile} ) {
$proc_manager->pm_write_pid_file( $options->{pidfile} );
}
-
+
$proc_manager->pm_manage();
}