HTTP::MobileAgent：サブクラス検知でいきなりつまづく

先に書いたHTTP::MobileAgentアーキテクチャ改修提案ですが、まだ本家には連絡していません。
とりあえず何か形がないと言っても流されるかもしれないので...。
とはいえ、今ある機能を全部再現してから提案、となると、元々一人メンテナ無理でしょ、というアタリから出てるのに本末転倒なのでアレですが、とりあえず最低限のアイデアの実現の目処は立ててから提案するかなと。

で、サブクラス・プラグインの自由な別開発、新規開発を可能にするための自動検知機構ですが、いきなりつまづきました。
こんな感じの実装を考えていたのですが（これはサブクラスの例ですが、プラグインも同じ）、
HTTP::MobileAgent.pmのimportメソッド

sub import{
    my $install_dir = __FILE__;
    $install_dir =~ s/\.pm/\/SubClass/;
    opendir (DIR,$install_dir);
    foreach my $file (readdir(DIR)){
        if (($file =~ /^(.+)\.pm$/) && ($1 ne 'NonMobile')) {
            my $subclass = "HTTP::MobileAgent::SubClass::$1";
            eval "use $subclass;";
            push (@subclasses,$subclass);
        }
    }
    foreach my $eachclass (@subclasses,"HTTP::MobileAgent::SubClass::NonMobile"){
        $eachclass->init();
    }
}

これで、一応うまくいくんです。
呼ばれているHTTP::MobileAgent.pmと同じライブラリツリーにインストールされているサブクラスは、自動検知できる。
いくんですけど、よく考えたら、サブクラスって、同じツリーにインストールされるとは限りませんよね。
PATHが通っているところならどこにでもインストールされる可能性があるわけで、特に開発環境でなんか、本番とは違うところにPATH通して開発中のプラグインとか置きたい、とか思うかもしれないのに、この方法だとそういうサブクラス・プラグインは検知されない。
同じようなことを、全てのPATHに関して自動検知してやろうとすると、@INCの全てのパスについてディレクトリ内調査してやらないといけない事になり、非常に効率が悪い。というか、実用性ゼロ。

できればプラグイン・サブクラスの自動検知にはこだわりたい...あるいは、他の方法でもいいんだけど、本体とサブクラス・プラグインの開発は独立しつつも、インストールさえすれば協調するようなやり方を何とかしたい、んですけど...。
誰かいいアイデアないですか...。

[composed and posted with ecto]