perl - 如何在 Perl/Plack 中打印环境变量

Question

我正在尝试使用 Perl/Plack 用环境变量切换“Ben”。如果设置了环境变量（例如“Dave”），那么它将打印出“Powered by Dave”。但如果未设置，它将默认为“Ben”。

目前，以下程序在使用时有效plackup -r

#!/usr/bin/env plackup

my $app = sub {
        my $env = shift;

        return [
            200,
            ['Content-Type', 'text/plain'],
            ['Powered by Ben'],
        ];

};

目前，我的 cpanfile 包含以下内容

requires 'Plack' => '1.0028';
requires 'CGI::Emulate::PSGI' => '0.15';
requires 'CGI::Compile' => '0.16';

Answer 1

Environment Varaible您的意思是操作系统的环境还是 plack 请求环境以及 HTTP 请求参数？（它们完全不同）。

如果是前者，您可以通过%ENV哈希访问它。

如果是后者，您应该阅读Plack::Request的文档。

（注意：我从来没有用过 plack；我只是看文档）