パッケージ名に変数を使用する場合の構文は？

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();