>>431
>>429の言うデータ構造にしてみ。
たとえばこんな感じ。

%Ext = (
foo => {
map{$_ => "/foo"}( "ab", "ac", "ad", "af" ),
},
bar => {
map{$_ => "/bar"}( "cc", "cd" ),
}
);


$Ext{bar}{cd}

とか

$Ext{foo}{ad}

とかでアクセスできるよ。