perl cgi session php,如何创建一个简单的Perl CGI

CGI脚本可以是简单的,也可以是复杂的。它可以是Perl、Java、Python或任何编程语言。在其核心,CGI应用程序只是通过HTTP(通常是web浏览器)接受请求并返回HTML。让我们看一个简单的Perl Hello World CGI脚本,并将其分解为最简单的表单。

3e7d47a6db2ee5e5bcbcf28d20bf63a5.png

'Hello World'CGI Perl脚本#!/usr/bin/perl

print "Content-type: text/html\n\n";

print <

A Simple Perl CGI

A Simple Perl CGI

Hello World

HTML

exit;

如果您在命令行上运行该程序,您将看到它所做的正是您所期望的。首先,它打印内容类型行,然后打印原始HTML。为了在web浏览器中看到它的运行情况,您需要将脚本复制或上载到web服务器,并确保权限设置正确(*nix systems上的chmod 755)。一旦设置正确,您应该能够浏览到它,并在服务器上看到实时显示的页面。

关键行是第一个print语句:print "Content-type: text/html\n\n";

这告诉浏览器,这两个换行之后的文档将是HTML。您必须发送一个标题,以便浏览器知道接下来的文档类型,并且必须在标题和实际文档之间包含空行。

发送头之后,只需要发送HTML文档本身。在上面的例子中,我们使用here-doc来简化打印一大块纯文本。当然,这与服务器上有一个纯HTML文档没有什么不同。当您添加一些奇特的Perl编程时,使用Perl之类的编程语言来创建HTML的真正威力就来了。

添加到基本脚本中

在下一个示例中,让我们使用这个时间和日期脚本的一部分,并将其添加到web页面中。#!/usr/bin/perl

@months = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);

@weekDays = qw(Sun Mon Tue Wed Thu Fri Sat Sun);

($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfWeek, $dayOfYear, $daylightSavings) = localtime();

$year = 1900 + $yearOffset;

$theTime = "$weekDays[$dayOfWeek] $months[$month] $dayOfMonth, $year";

print "Content-type: text/html\n\n";

print <

A Simple Perl CGI

A Simple Perl CGI

$theTime

HTML

exit;

这个新的CGI脚本将在每次调用脚本时将当前日期插入页面。换句话说,它变成了一个随着日期变化而变化的动态文档,而不是静态文档。

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值