.::Perl FastCGI Wrapper::.
Created by: Aprelium Technologies
Tutorial Written by Josh (TRUSTAbyss)
--------------------------------------------------------------------------------------------------
Instructions:
Install Perl using Aprelium's installation instructions,
http://www.aprelium.com/abyssws/perl.html
Download PerlFCGI.zip from:
http://files.trustabyss.com/PerlFCGI.zip (Includes FCGI)
Unzip the "PerlFCGI.zip" file to any folder on your computer and
do the following steps. This will be very easy to follow.
Step #1
Copy the following files to "C:\Perl\lib"
-> Persistent.pm
-> FCGI.pm
-> FastCGI.pl
Step #2
Copy the following folder to "C:\Perl\lib\auto"
-> FCGI
Step #3
Open your Abyss Web Server console and click on the Host
you wish to Configure. Go to "Scripting Parameters", and
change your current Perl settings too:
-> Interface: FastCGI (Local - Pipes)
-> Arguments: "C:\\Perl\\lib\\FastCGI.pl"
After you checked over your settings, restart Abyss Web Server.
Now you can start experiancing FastCGI with perl now.
-------------------------------------------------------------------------------------------------
Sample Scrtipt: "test.pl"
-------------------------------------------------------------------------------------------------
use CGI qw/:standard/;
print header,
start_html('A Simple Example'),
h1('A Simple Example'),
start_form,
"What's your name? ",textfield('name'),p,
"What's the combination?", p,
checkbox_group(-name=>'words',
-values=>['eenie','meenie','minie','moe'],
-defaults=>['eenie','minie']), p,
"What's your favorite color? ",
popup_menu(-name=>'color',
-values=>['red','green','blue','chartreuse']),p,
submit,
end_form,
hr;
if (param()) {
print "Your name is",em(param('name')),p,
"The keywords are: ",em(join(", ",param('words'))),p,
"Your favorite color is ",em(param('color')),
hr;
}
-------------------------------------------------------------------------------------------------
Sincerely, TRUSTAbyss