diff options
author | Edmund von der Burg <evdb@mysociety.org> | 2011-02-22 16:26:56 +0000 |
---|---|---|
committer | Edmund von der Burg <evdb@mysociety.org> | 2011-02-22 16:27:59 +0000 |
commit | aec7dc414ef8a31ac66a3420468d3b8def1a3cc4 (patch) | |
tree | 8baa0e60336a1fee9b3cc35a8d3a4ea50d2b2be9 /web/fixmystreet_app_fastcgi.cgi | |
parent | c3bcd8b53758e09a3c003cc8afe13064edabd11e (diff) |
Move to web directory
change suffix to .cgi so that default conf applies
add library paths
Diffstat (limited to 'web/fixmystreet_app_fastcgi.cgi')
-rwxr-xr-x | web/fixmystreet_app_fastcgi.cgi | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/web/fixmystreet_app_fastcgi.cgi b/web/fixmystreet_app_fastcgi.cgi new file mode 100755 index 000000000..03566029b --- /dev/null +++ b/web/fixmystreet_app_fastcgi.cgi @@ -0,0 +1,54 @@ +#!/usr/bin/env perl + +# set all the paths to the perl code +use FindBin; +use lib "$FindBin::Bin/../commonlib/perllib"; +use lib "$FindBin::Bin/../perllib"; +use local::lib "$FindBin::Bin/../local-lib5"; + +use Catalyst::ScriptRunner; +Catalyst::ScriptRunner->run('FixMyStreet::App', 'FastCGI'); + +1; + +=head1 NAME + +fixmystreet_app_fastcgi.pl - Catalyst FastCGI + +=head1 SYNOPSIS + +fixmystreet_app_fastcgi.pl [options] + + Options: + -? -help display this help and exits + -l --listen Socket path to listen on + (defaults to standard input) + can be HOST:PORT, :PORT or a + filesystem path + -n --nproc specify number of processes to keep + to serve requests (defaults to 1, + requires -listen) + -p --pidfile specify filename for pid file + (requires -listen) + -d --daemon daemonize (requires -listen) + -M --manager specify alternate process manager + (FCGI::ProcManager sub-class) + or empty string to disable + -e --keeperr send error messages to STDOUT, not + to the webserver + --proc_title Set the process title (is possible) + +=head1 DESCRIPTION + +Run a Catalyst application as fastcgi. + +=head1 AUTHORS + +Catalyst Contributors, see Catalyst.pm + +=head1 COPYRIGHT + +This library is free software. You can redistribute it and/or modify +it under the same terms as Perl itself. + +=cut |