1package # hide from pause 2 MyModule::OwnComponent; 3 4use Class::C3; 5 6sub message { 7 my $self = shift; 8 9 return join(" ", "OwnComponent", $self->next::method); 10} 11 121; 13