linux - 将主脚本变量传递到 Perl 模块

Question

我正在编写一个由用户运行的 Perl 脚本，并将当前 Linux 环境用作变量和其他变量。环境设置可能会发生变化，并且与原来的设置不同。

但是，我正在尝试使用自包含的 Perl 模块并且需要能够访问这些变量。这样做的最佳做法是什么？当我使用 Perl 模块创建对象时，我可以只传递 10 个变量，但这似乎太过分了......

谢谢

Answer 1

%ENV可以从全局哈希中的任何位置访问环境变量：

print $ENV{HOME};

如果您正在创建对象，它们可能具有一些属性（作为对象哈希、数组甚至是内部对象......）只需将相关值存储到属性中，例如

my $obj = Some::Package->new( name    => 'Homer',
                              surname => 'Simpson',
                              city    => 'Springfield',
                              # ... 7 more
                            );