モジュールの動的ロード

最近Perlで動的にモジュールをロードする場合、Class::Inspector&UNIVERSAL::requireの黄金コンビでやってます。

 use Class::Inspector;
 use UNIVERSAL::require;
 
 sub load_plugin {
     my $class = shift;
     my $plugin_class = shift;
     unless( Class::Inspector->loaded($plugin_class) ) {
         $plugin_class->require;
     }
 }

こんなかんじ。

おお、なんて美しいんでしょう。