1package # hide from pause 2 MyModuleNoBase; 3 4use base 'Class::C3::Componentised'; 5 6sub message { 7 my $msg = $_[0]->maybe::next::method() || ''; 8 9 return $msg . ' ' . __PACKAGE__; 10} 11 12sub new { 13 return bless {}, shift; 14} 15 161; 17