From 468fd592c2124e91d4129ff21238fe7c2e44134e Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Thu, 21 Aug 2025 09:38:10 +0000 Subject: Isolate Things Pt. 2, FCGI --- perl/fcgi.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl/fcgi.pl') diff --git a/perl/fcgi.pl b/perl/fcgi.pl index f3701e0..823cd86 100755 --- a/perl/fcgi.pl +++ b/perl/fcgi.pl @@ -12,8 +12,9 @@ BEGIN { require 'cgi.pl'; } while (1) { try { my $request = FCGI::Request( \*STDIN, \*STDOUT, \*STDERR, \%ENV, BARE_REQUEST ? 0 : FCGI::OpenSocket(SOCKET_FILE, SOCKET_MAX_CONNECTIONS)); + my ($data, $routes, $routes_cache) = GN::init(); while($request->Accept() >= 0) { - GN::cgi(); + GN::cgi($data, $routes, $routes_cache); } } catch ($error) { info("Crashed: $error"); -- cgit v1.2.3