1use strict; 2use warnings; 3package MooyRole; 4 5use Scalar::Util 'reftype'; 6use Moo::Role; # order is significant here 7use namespace::autoclean; 8 9sub role_stuff {} 10 11use constant CAN => [ qw(role_stuff) ]; 12use constant CANT => [ qw(has reftype) ]; 131; 14