Perl CGI 可靠地读取 url_param 和 param

Question

我正在编写一个函数，该函数将列出传递给 CGI 脚本的所有参数，无论是通过 POST 发送的表单、URL 字符串，还是两者。

为此有两个功能：

param()：尽管文档，我发现这个阅读无论是POST方法的参数从一种形式或网址参数仅如果没有post数据。

另一方面，url_param()将永远只读取通过 URL 字符串传入的参数，而不管 POST。

---

我的功能

sub post_and_url_param_keys{
  if(url_param){
    return [url_param, param];
  }else{
    return [param];
}

如果传入，它可以列出所有参数：

? POST 和 URL 参数

? 仅 POST 参数

仅X URL 参数（每个键列出两次）

有没有办法巧妙地解决这个问题，而不必检查每个参数对的名称和值是否有重复？

Answer 1

一个稍微改进的方法是检查是否request_method() eq 'POST'. 如果查询字符串和帖子都包含相同的参数名称，您仍然可能会得到重复的参数名称。