> $ while (1) > do > telnet yourmud.address.com port& > done
$port = "4000";
$host = "localhost";
$this = sockaddr_in($port,inet_aton($host));
for (0..30) {
if (!fork()) {
for (0..50) {
my $sock;
socket ($sock, AF_INET, SOCK_STREAM, getprotobyname('TCP'));
connect($sock,$this);
}
sleep;
}
}
sleep;
--Palrich

