kivitendo/dispatcher.fpl @ ad27efa6
|
#!/usr/bin/perl
|
|
|
|
|
|
use strict;
|
|
|
|
|
|
use FCGI;
|
|
|
use SL::Dispatcher;
|
|
|
|
|
|
SL::Dispatcher::pre_startup();
|
|
|
my $request = FCGI::Request();
|
|
|
SL::Dispatcher::handle_request('FastCGI') while $request->Accept() >= 0;
|
|
|
|
|
|
1;
|