04 March 2008, 14:19 | Mesaj No:1 |
Durumu:
Papatyam No :
1196
Üyelik T.:
09 December 2007
Arkadaşları:0
Cinsiyet:
Yaş:34
|
Perl ile port scGirdiginiz ip adresinin açik ve kapali olan portlarini gösterir
Perl ile port scGirdiginiz ip adresinin açik ve kapali olan portlarini gösterir Kod:
# Port Scanner # Coded bY Celil ÜNÜVER # Adres kısmına adresi taratmak istediginiz adresi yazacaksınız! # Sayi kısmına 1.porttan kaça kadar tarayacağınızı yazacaksınız # Ornek: perl portscanner.pl 127.0.0.1 500 # 127.0.0.1`i 1. porttan baslayarak 500e kadar tarar. $adres = $ARGV[0]; $sayi = $ARGV[1]; if(!$ARGV[0]){ print "Kullanimi:\n\t$0 #perl portscanner.pl [adres] [sayi]\n"; exit(); } $port=0; do { $port++; use IO::Socket; $socket = new IO::Socket::INET( PeerAddr => $adres, PeerPort => $port, Proto => 'tcp'); if ($socket){ print "$port ---> acik\n"; close($socket); } if (!$socket){ print "$port ---> kapali\n"; close($socket); } } while ($port < $sayi); print "Kodlayan: Celil Unuver\n"; print "Her zaman Tesekkurler Hurby\n" exit(); |
Bookmarks |
Konuyu Toplam 2 Üye okuyor. (0 Kayıtlı üye ve 2 Misafir) | |
Benzer Konular | ||||
Konu Başlıkları | Konuyu Başlatan | Papatyam Forum Ana Kategori Başlıkları |
Cevaplar | Son Mesajlar |
TRABZONSPOR’U DÜŞÜNÜYORUM GÖZLERIM KAPALI | umut | Trabzonspor | 1 | 20 June 2011 13:18 |
GÜZEL SANATLAR PARKI AÇIK HAVA MÜZESİ | umut | İzmir | 3 | 22 September 2009 15:18 |
PERL NEDİR ? | CoNQueRoR_61 | Web Master | 2 | 20 January 2009 15:43 |
AÇIK GEZMEK DİĞER GÜNAHLARDAN FARKLI MIDIR | umut | Dinde örtünmenin yeri | 0 | 04 June 2008 12:28 |
KADINLAR BAŞI AÇIK NAMAZ KILABİLİR Mİ? | REHA | Dini Sohbetler | 0 | 16 May 2006 14:38 |
Tefekküre Davet Köşesi |
|
Papatyam Sosyal Medya Guruplarımıza Katılın |