第一个使用Perl的CGI程序

这是一个名为hello.cgi的简单Perl CGI程序。该文件已保存在/ cgi-bin / 目录中,并且具有以下内容。在运行CGI程序之前,请确保使用chmod 755 hello.cgi  UNIX命令更改文件的模式 。

#!/usr/bin/perl
print "Content-type:text/html\r\n\r\n";
print '<html>';
print '<head>';
print '<title>Hello Word - First CGI Program</title>';
print '</head>';
print '<body>';
print '<h2>Hello Word! This is my first CGI program</h2>';
print '</body>';
print '</html>';
1;

现在,如果您单击 hello.cgi 链接,那么请求将发送到Web服务器,该服务器在/ cgi-bin目录中搜索hello.cgi,执行该命令,并生成任何结果,Web服务器将该结果发送回Web浏览器,如下所示-

Hello Word! This is my first CGI program

这个hello.cgi脚本是一个简单的Perl脚本,它在STDOUT文件(即屏幕)上写入其输出。有一个重要的额外功能可用,即要打印的第一行Content-type:text / html \ r \ n \ r \ n。该行被发送回浏览器,并指定要在浏览器屏幕上显示的内容类型。现在您必须已经了解CGI的基本概念,并且可以使用Perl编写许多复杂的CGI程序。该脚本还可以与任何其他外部系统进行交互,以交换信息,例如数据库,Web服务或任何其他复杂的界面。