Select Code to Download

My::EventManager->observe( 'foo.on_mobble' => sub {
  my $event = shift;
...
  my $foo = $event->src;
  # Do stuff to $foo
});

# Let anyone who cares know that $foo has just mobbled.
$foo->notify( event => 'foo.on_mobble' );