我有一个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
钩子,以便我可以获取某些局部变量来转储调试信息
什么是本地命名空间?
答案 0 :(得分:0)
只有使用our
共享的变量才能通过这种方式访问。