sub on_umode {
  my ($self, $event) = @_;

  print "got umode\n";
#  print "umode args = " . $event->args . "\n";
}
...
$conn->add_handler('umode',   \&on_umode);