package SomePackage;
use base ParentPackage;
use Class::Mockable
_returnvalue => 94,
methods => {
_wrapped_method => 'wrapped_method',
_wrapped_method_in_parent => 'wrapped_method_in_parent',
};
sub get_returnvalue {
my $class = shift;
return _returnvalue();
}
sub wrapped_method {
my $class = shift;
return "wrapped method";
}
1;