The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package # hide from pause
  MyModule;
use strict;
use warnings;

use base 'Class::C3::Componentised';

sub component_base_class { "MyModule::Plugin" }

sub message {
  my $msg = $_[0]->maybe::next::method() || '';

  return $msg . ' ' . __PACKAGE__;
}

sub new {
  return bless {}, shift;
}

1;