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

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

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

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