sub Tiger::explode {
      my $self = shift;
      $self->Bomb::explode;
  }