#!c:/perl/bin/perl
use CGI::Fast;
####
Error!
Can't locate object method "FILENO" via package "FCGI::Stream" at
C:/Perl/lib/CGI.pm line 822.
Compilation failed in require at C:/Perl/lib/CGI/Fast.pm line 20.
BEGIN failed--compilation aborted at C:/Perl/lib/CGI/Fast.pm line 20.
Compilation failed in require at (eval 4) line 4.
BEGIN failed--compilation aborted at (eval 4) line 4.
####
#!c:/perl/bin/perl -w
use strict;
use CGI::Fast;
my $count = 1;
while (my $q = CGI::Fast->new)
{
print("Content-Type: text/plain\n\n");
print("Process ID: $$; Count is: " . ++$count);
}
####
[Types]
fcgi=FCGI
[FCGI]
ExePath=C:\perl\bin\perl.exe
Arguments="-MFCGI::IIS=eval"
####
[Types]
fcgi=FCGI
[FCGI]
ExePath=C:\perl\bin\perl.exe
Arguments=d:\inetpub\cgi-bin\hello.fcgi