推荐答案
在 Perl 中使用 CGI.pm 模块可以方便地处理 CGI 请求和生成 HTML 内容。以下是一个简单的示例，展示了如何使用 CGI.pm 模块来处理表单提交并生成响应页面。
-- -------------------- ---- ------- --- ------- --- --------- --- ---- - ---- --- -- -- ---- - --------- - ------ -- ----- - ------------------- -- -------- - -- ---- -- ----- -------------------------- ----- ----------------------- ------- ----- ---------------- --------- ----- ---------------
本题详细解读
1. 引入 CGI.pm 模块
首先，需要在脚本中引入 CGI.pm 模块。通过 use CGI; 语句，Perl 会加载 CGI.pm 模块，并使其功能可用。
2. 创建 CGI 对象
使用 CGI->new 创建一个 CGI 对象。这个对象将用于处理 CGI 请求和生成响应。
my $cgi = CGI->new;
3. 获取表单数据
通过 param 方法可以获取表单提交的数据。例如，$cgi->param('name') 会返回名为 name 的表单字段的值。如果该字段不存在，则返回 undef，因此可以使用 || 操作符提供一个默认值。
my $name = $cgi->param('name') || 'Guest';4. 生成 HTML 响应
使用 CGI.pm 提供的方法可以方便地生成 HTML 内容。header 方法用于生成 HTTP 响应头，start_html 方法生成 HTML 文档的开头部分，h1 方法生成一个 <h1> 标签，end_html 方法生成 HTML 文档的结尾部分。
print $cgi->header('text/html');
print $cgi->start_html('Hello Page');
print $cgi->h1("Hello, $name!");
print $cgi->end_html;5. 运行脚本
将上述代码保存为一个 .pl 文件，并放置在 CGI 可执行的目录中。通过浏览器访问该脚本的 URL，即可看到生成的 HTML 页面。
6. 其他功能
CGI.pm 还提供了许多其他功能，如处理文件上传、设置和读取 Cookie、生成表单元素等。可以通过查阅 CGI.pm 的文档来了解更多详细信息。