The nginx web server is a fast, lightweight server designed to efficiently handle the needs of both low and high traffic websites. Although commonly used to serve static content, it’s quite capable of handling dynamic pages as well. This guide will help you get nginx up and running with Perl and FastCGI on your CentOS 5 Linux VPS.
It is assumed that you’ve already followed the steps outlined in our getting started guide. These steps should be performed via a root login to your Linode VPS over SSH.
Set the Hostname
Before you begin installing and configuring the components described in this guide, please make sure you’ve followed our instructions for setting your hostname. Issue the following commands to make sure it is set properly:
1 2 |
hostname hostname -f |
The first command should show your short hostname, and the second should show your fully qualified domain name (FQDN).
Install Required Packages
CentOS doesn’t include nginx in their repositories, so you’ll need to add support for EPEL (Extra Packages for Enterprise Linux) from the Fedora project. Issue the following command:
1 |
rpm -Uvh http://download.fedora.redhat.com/pub/epel/5/i386/epel-release-5-4.noarch.rpm |
Issue the following commands to update your system and install the nginx web server and compiler tools (Perl should already be installed):
1 2 3 4 5 6 |
yum update yum install nginx make automake gcc gcc-c++ fcgi-perl wget yum install nginx fcg-perl wget chkconfig –add nginx chkconfig nginx on /etc/init.d/nginx start |
You’ll be asked to accept the key for EPEL, as it gets imported the first time you install an EPEL package.
Configure Virtual Hosting
In this guide, the domain “example.com” is used as an example site. You should substitute your own domain name in the configuration steps that follow. First, create directories to hold content and log files:
1 2 3 |
mkdir -p /srv/www/www.example.com/public_html mkdir /srv/www/www.example.com/logs chown -R nginx:nginx /srv/www/www.example.com |
Issue the following commands to create virtual hosting directories:
1 2 |
mkdir /etc/nginx/sites-available mkdir /etc/nginx/sites-enabled |
Add the following lines to your /etc/nginx/nginx.conf file, immediately after the line for include /etc/nginx/conf.d/*.conf:
/etc/nginx/nginx.conf
1 2 |
# Load virtual host configuration files. include /etc/nginx/sites-enabled/*; |
Next, you’ll need to define the site’s virtual host file:
/etc/nginx/sites-available/www.example.com
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
server { listen 80; server_name www.example.com example.com; access_log /srv/www/www.example.com/logs/access.log; error_log /srv/www/www.example.com/logs/error.log;
location / { root /srv/www/www.example.com/public_html; index index.html index.htm; }
location ~ \.pl$ { gzip off; include /etc/nginx/fastcgi_params; fastcgi_pass 127.0.0.1:8999; fastcgi_index index.pl; fastcgi_param SCRIPT_FILENAME /srv/www/www.example.com/public_html$fastcgi_script_name; } } |
Issue the following commands to enable the site:
1 2 3 |
cd /etc/nginx/sites-enabled/ ln -s /etc/nginx/sites-available/www.example.com /etc/init.d/nginx restart |
You may wish to create a test HTML page under /srv/www/www.example.com/public_html/ and view it in your browser to verify that nginx is properly serving your site (Perl will not work yet). Please note that this will require an entry in DNS pointing your domain name to your Linode’s IP address (found on the “Remote Access” tab in the Linode Manager).
Configure FastCGI Wrapper
First create the FastCGI wrapper script (credit: Denis S. Filimonov) at /usr/bin/fastcgi-wrapper.pl with the following contents:
/usr/bin/fastcgi-wrapper.pl
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 |
#!/usr/bin/perl
use FCGI; use Socket; use POSIX qw(setsid);
require ‘syscall.ph’;
&daemonize;
#this keeps the program alive or something after exec’ing perl scripts END() { } BEGIN() { } *CORE::GLOBAL::exit = sub { die “fakeexit\nrc=”.shift().”\n”; }; eval q{exit}; if ($@) { exit unless $@ =~ /^fakeexit/; };
&main;
sub daemonize() { chdir ‘/’ or die “Can’t chdir to /: $!”; defined(my $pid = fork) or die “Can’t fork: $!”; exit if $pid; setsid or die “Can’t start a new session: $!”; umask 0; }
sub main { $socket = FCGI::OpenSocket( “127.0.0.1:8999”, 10 ); #use IP sockets $request = FCGI::Request( \*STDIN, \*STDOUT, \*STDERR, \%req_params, $socket ); if ($request) { request_loop()}; FCGI::CloseSocket( $socket ); }
sub request_loop { while( $request->Accept() >= 0 ) {
#processing any STDIN input from WebServer (for CGI-POST actions) $stdin_passthrough =”; $req_len = 0 + $req_params{‘CONTENT_LENGTH’}; if (($req_params{‘REQUEST_METHOD’} eq ‘POST’) && ($req_len != 0) ){ my $bytes_read = 0; while ($bytes_read < $req_len) { my $data = ”; my $bytes = read(STDIN, $data, ($req_len – $bytes_read)); last if ($bytes == 0 || !defined($bytes)); $stdin_passthrough .= $data; $bytes_read += $bytes; } }
#running the cgi app if ( (-x $req_params{SCRIPT_FILENAME}) && #can I execute this? (-s $req_params{SCRIPT_FILENAME}) && #Is this file empty? (-r $req_params{SCRIPT_FILENAME}) #can I read this file? ){ pipe(CHILD_RD, PARENT_WR); my $pid = open(KID_TO_READ, “-|”); unless(defined($pid)) { print(“Content-type: text/plain\r\n\r\n”); print “Error: CGI app returned no output – “; print “Executing $req_params{SCRIPT_FILENAME} failed !\n”; next; } if ($pid > 0) { close(CHILD_RD); print PARENT_WR $stdin_passthrough; close(PARENT_WR);
while(my $s = <KID_TO_READ>) { print $s; } close KID_TO_READ; waitpid($pid, 0); } else { foreach $key ( keys %req_params){ $ENV{$key} = $req_params{$key}; } # cd to the script’s local directory if ($req_params{SCRIPT_FILENAME} =~ /^(.*)\/[^\/]+$/) { chdir $1; }
close(PARENT_WR); close(STDIN); #fcntl(CHILD_RD, F_DUPFD, 0); syscall(&SYS_dup2, fileno(CHILD_RD), 0); #open(STDIN, “<&CHILD_RD”); exec($req_params{SCRIPT_FILENAME}); die(“exec failed”); } } else { print(“Content-type: text/plain\r\n\r\n”); print “Error: No such CGI app – $req_params{SCRIPT_FILENAME} may not “; print “exist or is not executable by this process.\n”; }
} } |
Then create an init script to control the FastCGI process that matches the one shown below:
/etc/rc.d/init.d/perl-fastcgi
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 |
#!/bin/sh # # nginx – this script starts and stops the nginx daemon # # chkconfig: – 85 15 # description: Nginx is an HTTP(S) server, HTTP(S) reverse \ # proxy and IMAP/POP3 proxy server # processname: nginx # config: /opt/nginx/conf/nginx.conf # pidfile: /opt/nginx/logs/nginx.pid
# Source function library. . /etc/rc.d/init.d/functions
# Source networking configuration. . /etc/sysconfig/network
# Check that networking is up. [ “$NETWORKING” = “no” ] && exit 0
perlfastcgi=”/usr/bin/fastcgi-wrapper.pl” prog=$(basename perl)
lockfile=/var/lock/subsys/perl-fastcgi
start() { [ -x $perlfastcgi ] || exit 5 echo -n $”Starting $prog: “ daemon $perlfastcgi retval=$? echo [ $retval -eq 0 ] && touch $lockfile return $retval }
stop() { echo -n $”Stopping $prog: “ killproc $prog -QUIT retval=$? echo [ $retval -eq 0 ] && rm -f $lockfile return $retval }
restart() { stop start }
reload() { echo -n $”Reloading $prog: “ killproc $nginx -HUP RETVAL=$? echo }
force_reload() { restart } rh_status() { status $prog }
rh_status_q() { rh_status >/dev/null 2>&1 }
case “$1” in start) rh_status_q && exit 0 $1 ;; stop) rh_status_q || exit 0 $1 ;; restart) $1 ;; reload) rh_status_q || exit 7 $1 ;; force-reload) force_reload ;; status) rh_status ;; condrestart|try-restart) rh_status_q || exit 0 ;; *) echo $”Usage: $0 {start|stop|status|restart|condrestart|try-restart|reload|force-reload}” exit 2 esac |
Next issue the following commands to make the scripts executable and set the perl-fastcgi process to start on boot:
1 2 3 4 5 |
chmod +x /usr/bin/fastcgi-wrapper.pl chmod +x /etc/rc.d/init.d/perl-fastcgi /etc/rc.d/init.d/perl-fastcgi start chkconfig –add perl-fastcgi chkconfig perl-fastcgi on |
Test Perl with FastCGI
Create a file called “test.pl” in your site’s “public_html” directory with the following contents:
/srv/www/www.example.com/public_html/test.pl
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
#!/usr/bin/perl
print “Content-type:text/html\n\n”; print <<EndOfHTML; <html><head><title>Perl Environment Variables</title></head> <body> <h1>Perl Environment Variables</h1> EndOfHTML
foreach $key (sort(keys %ENV)) { print “$key = $ENV{$key}<br>\n”; }
print “</body></html>”; |
Make the script executable by issuing the following command:
1 |
chmod a+x /srv/www/www.example.com/public_html/test.pl |
When you visit http://www.example.com/test.pl in your browser, your Perl environment variables should be shown. Congratulations, you’ve configured the nginx web server to use Perl with FastCGI for dynamic content!