Check Bot-CPAN. It's Glue module uses Attribute::Handlers to define well.. attributes to methods. That lets you define a bot command like:

    sub list
         :help ("lists available modules")
         :private
         :adminCmd
    {
       # implements list()
    }
[download]

I thought that was a rather elegant way of doing this.