转储 mod_perlified 变量——本地命名空间是什么？

Question

我有一个 mod_perl 脚本：

use strict;
use warnings FATAL => 'all';
use 5.010001;

my $face = 'ugly';

use Data::Dump qq(pp);
die pp($ModPerl::ROOT::ModPerl::Registry::C_3a_www_test_2epl::face);

它死了undef at C:/www/test.pl line 8.

我期待"ugly" at C:/www/test.pl line 8.

如果不是我

die pp(%ModPerl::ROOT::ModPerl::Registry::C_3a_www_test_2epl::);

...重新启动服务以清除所有缓存变量后，face 甚至没有列出。

我可以发誓我上次使用这段代码时可以正常工作...我围绕这种命名局部变量的方式写了一个完整的die 钩子，以便我可以获取某些局部变量来转储调试信息。

什么是本地命名空间？

Answer 1

只有使用our 共享的变量才能通过这种方式访问​​。