gistfile1.pl

      if ($message->{body} =~ /^\`join(.*)/) {
                          $self->join("$1");
                        }



                        if (($message->{body} =~ /^`quit/) and ($message->{raw_nick} eq "b4!sixty-two\@you.need.to.stfu-kthx.net")) {
                                $self->{other_bot}->quit("bai");
                                $self->{other_bot2}->quit("bai");
                                $self->{other_bot3}->quit("bai");
                                $self->quit("bai");
                                exit();
                                }