pluginsメソッド

sub plugins {
    map { $_->new }
    sort plugin_sort
    grep { /Plugin::(?:(?!Base|NoMatch).)+$/ }
    _plugins(@_);
}

grepしてsortしてmap。…さすがにこれはちょっとどうよ?とか思わないこともない。