* Use Catalyst's HTTP::Prefork engine by default, with some limits to

prevent the server from being overloaded.
This commit is contained in:
Eelco Dolstra 2009-03-11 15:48:06 +00:00
parent 8b752627a2
commit f945fbb5bd
2 changed files with 6 additions and 1 deletions

View file

@ -68,6 +68,7 @@ let
perlCatalystPluginStackTrace perlCatalystPluginStackTrace
perlCatalystAuthenticationStoreDBIxClass perlCatalystAuthenticationStoreDBIxClass
perlCatalystViewTT perlCatalystViewTT
perlCatalystEngineHTTPPrefork
perlXMLSimple perlXMLSimple
perlIPCRun perlIPCRun
perlIOCompressBzip2 perlIOCompressBzip2

View file

@ -1,7 +1,7 @@
#!/var/run/current-system/sw/bin/perl -w #!/var/run/current-system/sw/bin/perl -w
BEGIN { BEGIN {
$ENV{CATALYST_ENGINE} ||= 'HTTP'; $ENV{CATALYST_ENGINE} ||= 'HTTP::Prefork';
$ENV{CATALYST_SCRIPT_GEN} = 32; $ENV{CATALYST_SCRIPT_GEN} = 32;
require Catalyst::Engine::HTTP; require Catalyst::Engine::HTTP;
} }
@ -63,6 +63,10 @@ Hydra->run( $port, $host, {
restart_regex => qr/$restart_regex/, restart_regex => qr/$restart_regex/,
restart_directory => $restart_directory, restart_directory => $restart_directory,
follow_symlinks => $follow_symlinks, follow_symlinks => $follow_symlinks,
min_servers => 2,
max_servers => 10,
min_spare_servers => 2,
max_spare_servers => 5,
} ); } );
1; 1;