Perlでオブジェクト指向

新規処理用のフレームワークを検討している中で、オブジェクト指向で行きたいと思い調査してもらった。
出来るのは知っていたが、Factoryパターンや、Templateパターンと利用出来そう。
またFactoryパターンを調査している中で、インスタンスを作成するクラスを外出しが出来ることが判明

my $class = "クラス名";
eval qq(require $class; import $class);

クラス名のところをファイルに書き出したら、簡易DIのようになりそう。