perl - 将 perl 变量发布或传递到下一个网页？

Question

如何将变量从一个 perl 网页传递到下一个网页，这是我的示例：

这是我想要从第一页传递的内容，$data[0]并且$data[2]

<a href="Month_entries.pl?month='$data[2]'&user='$data[0]' 
       style="text-decoration:none" 
       onclick="return popitup('Month_entries')">$busitotal2</a>

那么Month_entries.pl如何在新网页（Month_entries）中调用这些变量？这个过程叫什么？

Answer 1

首先，您应该确保您正在构建您真正想要的 URI。

• 您可能不希望'数据中有字符
• 您的问题应该是使用URI::Encode防止 XSS 和损坏的数据。

然后归结为从查询字符串中获取数据。

你如何做到这一点取决于你的服务器和 Perl 是如何通信的。

如果您使用的是 Plack（这对于现代 Perl 来说通常是一个好主意），那么请查看Plack::Request概要中的代码：

my $app_or_middleware = sub {
    my $env = shift;
    my $req = Plack::Request->new($env);
    my $path_info = $req->path_info;

    # Change 'query' to whatever you called your key in the query string
    my $query     = $req->param('query');

    my $res = $req->new_response(200);
    $res->finalize;
};

如果您使用的是框架（例如 Web::Simple、Catalyst 或 Dancer），那么它可能会提供自己的界面。

如果您使用 CGI 并使用 CGI 模块，您将：

my $cgi = CGI->new();
my $ query = $cgi->param('query')