package Package::Variant;
-use strictures 1;
+use strictures 2;
use Import::Into;
use Module::Runtime qw(require_module);
use Carp qw(croak);
-our $VERSION = '1.002002';
+our $VERSION = '1.003002';
$VERSION = eval $VERSION;
# 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;