#! /usr/bin/perl

# Self propagation part of the adapted Lupper Worm attack simulated by sending the following request 10 times via wget
# http://www.google.com.mt/search?hl=mt&q=powered+by+PHPBB&start=90&sa=N

for($i=0; $i<20; $i++)
{

	my @args = ("wget", "http://www.google.com");
        system(@args) == 0 or die "system @args failed: $?";
}

#for($i=0; $i<10; $i++)
#{

#	my @args = ("wget", "-U", "Mozilla/4.0 \(compatible\; MSIE 8.0\; Windows NT 5.1\; Trident/4.0\; \{89F203B9-C4D8-B36F-E6BB-75C713DB1C36\}\)",  "http://www.google.com.mt/search?hl=mt&q=powered+by+PHPBB&start=1".$i);
#        system(@args) == 0 or die "system @args failed: $?";
#}
