Perl 5 role with a message method
