Hi Folks
Just for the record, here's a similar program to Dan's, but using
FCGI::ProcManager:
> #!/usr/bin/perl -w
> use strict;
> use FindBin qw($B
> use Webapp;
> use CGI::Fast();
>
> while (my $q = new CGI::Fast){
> my $webapp = Webapp->new(
> QUERY => $q,
> );
> $webapp-
Thank you Dan and everybody who replied to my postings.
It was a really CGI::Application::FastCGI module problem and
the easy fix for it is to include additional header directives into
cgiapp_prerun method as shown below.
sub cgiapp_prerun {
my $self = shift;
# This is a fix for Fa
Hi Alex
As requested. You instance script should look something like:
#!/usr/bin/perl -w
use strict;
use FindBin qw($B
use Webapp;
use CGI::Fast();
while (my $q = new CGI::Fast){
my $webapp = Webapp->new(
QUERY => $q,
);
$webapp->run();
}
In you application class simply put "r