SL::FCGIFixes::apply_fixes();
-SL::Dispatcher::pre_startup();
+my $dispatcher = SL::Dispatcher->new('FastCGI');
+$dispatcher->pre_startup;
+
my $request = FCGI::Request();
-SL::Dispatcher::handle_request('FastCGI') while $request->Accept() >= 0;
+$dispatcher->handle_request($request) while $request->Accept() >= 0;
1;