We Are DevilzCrew
 
IndeksPendaftaranLogin

Share | 
 

 scan enclosure your target as you want =) with fastest

Topik sebelumnya Topik selanjutnya Go down 
PengirimMessage
gunslinger_
Asisten LAB
Asisten LAB


Jumlah posting : 184
Join date : 15.05.09
Age : 24
Lokasi : mars

PostSubyek: scan enclosure your target as you want =) with fastest   Sun Jun 14, 2009 4:28 pm

scan target dengan kata kunci sesuai keinginan kaka...
Cool Cool Cool Cool

Code:

#!/usr/bin/perl
use IO::Socket::INET;
use HTTP::Request;
use LWP::UserAgent;
require LWP;
$|++;
#devilzc0de c0der
print q{
};
print "masukan dork : ";
chomp ($kiddies=<STDIN>);
print "Insert Output : ";
chomp ($peti=<STDIN>);
##############
if ($kiddies=~ /(.*)/){
print "--------------------------------\n";
print "Ok, let's rock devilzc0de... \n";
print "--------------------------------\n\n";
my $flyff666=$1;
# Starting The Search Engine
my @mlist=&msn($flyff666);
############
# SUBS MSN #
############
sub msn(){
my @lst;
for($spykit=1;$spykit<=1000;$spykit+=10){
#------------------------------------------
my $ua=LWP::UserAgent->new;
$ua->agent("");
#------------------------------------------
my $MsN=("http://search.live.com/results.aspx?q=".$flyff666."&first=".$spykit."&FORM=PERE");
my $g0nzhack=$ua->get("$MsN");
$g0nzhack->as_string;
my $wisdom=$g0nzhack->content;
while($wisdom =~ m/<a href=\"?http:\/\/([^>\"]*)/g){
if($1 !~ /msn|live|microsoft|WindowsLiveTranslator|youtube/){
my $gunslinger=$1;
$gunslinger=~s/&(.*)/\ /g;
print "http://$gunslinger\n";
open(FILE,">>$peti");
print FILE "http://$gunslinger\n";
close(FILE);
}}}
}}

print "\n-----------------------------------------------------------";
print "\nResult : $peti";
<STDIN>;
system("$0");

save as "scanner.pl"



Arrow Arrow Arrow Arrow Arrow dont try this [at] home
lol! lol! lol! lol! lol! lol! lol!
simple tools for you...


Terakhir diubah oleh gunslinger_ tanggal Fri Jun 19, 2009 11:24 pm, total 2 kali diubah
Kembali Ke Atas Go down
flyff666
Admin
Admin
avatar

Jumlah posting : 44
Join date : 29.04.09

PostSubyek: Re: scan enclosure your target as you want =) with fastest   Sun Jun 14, 2009 5:51 pm

wah om yudha .. mantab bgt bisa pke ilmu perl..

btw ini tools wat RFI ato sql kk??
Kembali Ke Atas Go down
http://devilzc0de.forumotion.com
gunslinger_
Asisten LAB
Asisten LAB


Jumlah posting : 184
Join date : 15.05.09
Age : 24
Lokasi : mars

PostSubyek: Re: scan enclosure your target as you want =) with fastest   Mon Jun 15, 2009 4:03 am

bisa kok...
cari target langsung rfi, sqli, lfi dengan cepet
bayangin kalo google bisa berjam" nich om...
Kembali Ke Atas Go down
3dh0
Pengunjung
Pengunjung
avatar

Jumlah posting : 4
Join date : 18.06.09

PostSubyek: Re: scan enclosure your target as you want =) with fastest   Thu Jun 18, 2009 1:33 am

kaka di coba dulunih ilmunya kayanya mantap nih Twisted Evil
Kembali Ke Atas Go down
kiddies
Asisten LAB
Asisten LAB
avatar

Jumlah posting : 135
Join date : 05.05.09

PostSubyek: Re: scan enclosure your target as you want =) with fastest   Thu Jun 18, 2009 8:13 am

keren loh udeh isa buat tools pk perl om....w jah masih bingung om, malhan w ge mau buat pke python om, belum jadi2 lagi om....
Kembali Ke Atas Go down
gunslinger_
Asisten LAB
Asisten LAB


Jumlah posting : 184
Join date : 15.05.09
Age : 24
Lokasi : mars

PostSubyek: Re: scan enclosure your target as you want =) with fastest   Thu Jun 18, 2009 2:08 pm

perl sama phyton gg beda jauh loh kaka...
coba deh kaka perhatiin...
anggap ajah phyton lakinya,
perl cewenya
bweheheheheee...
Kembali Ke Atas Go down
Sponsored content




PostSubyek: Re: scan enclosure your target as you want =) with fastest   

Kembali Ke Atas Go down
 
scan enclosure your target as you want =) with fastest
Topik sebelumnya Topik selanjutnya Kembali Ke Atas 
Halaman 1 dari 1
 Similar topics
-
» Lima Antivirus!
» ARISAN ONLINE CYBER NINJA250R
» cheetah,brt,andrion im8??
» ULTRAGAUGE, OBDII Scan Tool and an Information Center (Multi Information Display)

Permissions in this forum:Anda tidak dapat menjawab topik
Devilzc0de TeaM :: Computer :: Attacking-Web-
Navigasi: