Take a look on Module::Pluggable. It allows you to create plugins that are triggered under given circumstances. For instance:

  foreach my $plugin ($self->plugins) {
    next unless $plugin->can('handle_walk_across_the_screen');
    $plugin->handle_walk_across_the_screen($character);
  }
[download]