Perl Moose Role to use with MooseX::Getopt to generate a coloured usage message from your classes meta