kivitendo/dispatcher.fpl @ 631b4c04
| a4e48368 | Sven Schöling | #!/usr/bin/perl
|
||
use strict;
|
||||
use FCGI;
|
||||
| 94899fc9 | Moritz Bunkus | use SL::Dispatcher;
|
||
| f5bc2335 | Moritz Bunkus | use SL::FCGIFixes;
|
||
| 7a0da5ac | Moritz Bunkus | our $dispatcher = SL::Dispatcher->new('FastCGI');
|
||
| c203c637 | Moritz Bunkus | $dispatcher->pre_startup_setup;
|
||
SL::FCGIFixes::apply_fixes();
|
||||
$dispatcher->pre_startup_checks;
|
||||
| 23f79a87 | Moritz Bunkus | |||
| 94899fc9 | Moritz Bunkus | my $request = FCGI::Request();
|
||
| 23f79a87 | Moritz Bunkus | $dispatcher->handle_request($request) while $request->Accept() >= 0;
|
||
| a4e48368 | Sven Schöling | |||
1;
|