在包名中使用变量的语法？

Question

我想调用从变量生成的包名称上的方法。我想我以前做过这件事，但似乎我忘记了怎么做。这是我试图实现的破碎版本。

my $var = 'Page';
my $p = My::Package::$var->new();

Answer 1

我能够使用Perl, dynamically include package

的答案来解决这个问题

my $module_name = 'Some::Module';
(my $require_name = $module_name . ".pm") =~ s{::}{/}g;
require $require_name;
my $obj = $module_name->new();