Select Code to Download

package Hash::Pretender;

...
    = q{Can't locate object method "set_attr2" via package "Hash::Pret
+ender"};
is( substr( $err, 0, length $msg), $msg,
    'Set attr2 fails for the expected reason' );