# declaring a variable Moo role
package My::VariableRole::ObjectAttr;
- use strictures 1;
+ use strictures 2;
use Package::Variant
# what modules to 'use'
importing => ['Moo::Role'],
# using the role
package My::Class::WithObjectAttr;
- use strictures 1;
+ use strictures 2;
use Moo;
use My::VariableRole::ObjectAttr;
# declaring a variable Moo role that can be named
package My::VariableRole::ObjectAttrNamed;
- use strictures 1;
+ use strictures 2;
use Package::Variant importing => ['Moo::Role'],
subs => [ qw(has around before after with) ];
use Module::Runtime 'module_notional_filename'; # only if you need protection
# using the role
package My::Class::WithObjectAttr;
- use strictures 1;
+ use strictures 2;
use Moo;
use My::VariableRole::ObjectAttrNamed;