超级会员免费看
使用Perl进行CGI脚本编程
1. CGI::Carp模块
CGI::Carp模块随CGI.pm一起提供，通常也是标准Perl发行版的一部分。它用于为CGI脚本生成错误消息，对调试脚本很有用。特别是 fatalsToBrowser 关键字，能将Perl错误以HTML响应的形式打印出来，显示在调用表单的浏览器中。要将错误回显到浏览器，可在脚本顶部添加如下代码：
use CGI::Carp qw(fatalsToBrowser);
即便不使用 fatalsToBrowser ，CGI::Carp模块也会重新定义 warn() 和 die() 函数，并添加 croak() 、 carp() 和 confess() 子例程，使错误能以合理的标识符打印，并显示在Web服务器的错误日志中。
2. 调查示例
之前的“Hello World”示例虽能让你了解CGI脚本的工作原理，但过于简单。下面是一个更复杂的处理基于Web的调查的脚本。该脚本会跟踪所有调查数据，处理当前表单的输入，并根据已提交的所有数据生成结果表格。
2.1 表单
以下是调查表单的HTML代码：
<html>
<head>
<title>Quick
订阅专栏 解锁全文
扫一扫
1094
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
