);
is(
- exception { OtherStrictSubclass->new( thing => 1, size => 'large', ) }
- , undef,
- 'strict subclass from parent that doesn\'t use strict constructor handles known attributes correctly'
+ exception { OtherStrictSubclass->new( thing => 1, size => 'large', ) },
+ undef,
+ q{strict subclass from parent that doesn't use strict constructor handles known attributes correctly}
);
like(
exception { OtherStrictSubclass->new( thing => 1, bad => 99 ) },
qr/unknown attribute.+: bad/,
- 'strict subclass from parent that doesn\'t use strict correctly recognizes bad attribute'
+ q{strict subclass from parent that doesn't use strict correctly recognizes bad attribute}
);
is(