added Moose::Util::is_role (thanks trs for the suggestion!)