my %dummies;

foreach (1..100) {
  srand;
  my $extra = int(rand(256));
  warn "ralph" . $extra . "\n";

  $dummies{$_} = 
    dacts (     "ralph" . $extra,
                "myvoiceismypassword",
                "127.0.0.1",
                8888    );
}
for (;;) { }

##</code><code>##

write(2, "connected to server\n", 20connected to server
)   = 20
write(2, "username: ralph187 | password: m"..., 82username: ralph187 | password: myvoiceismypassword at alternativejoin.pl line 17.
) = 82
rt_sigaction(SIGPIPE, {SIG_DFL}, {SIG_DFL}, 8) = 0
rt_sigaction(SIGPIPE, {SIG_IGN}, {SIG_DFL}, 8) = 0
write(67, "3\0\2\0 ralph187 myvoiceismypasswor"..., 55) = -1 EAGAIN (Resource temporarily unavailable)
rt_sigaction(SIGPIPE, {SIG_DFL}, {SIG_IGN}, 8) = 0
time(NULL)                              = 979853416
time(NULL)                              = 979853416
_newselect(0x48, 0x1061a1f0, 0, 0, 0x7ffff938 <unfinished ...>

##</code><code>##

Jan 18 16:23:52 macachu kernel: __alloc_pages: 2-order allocation failed. 
Jan 18 16:23:52 macachu last message repeated 639 times
Jan 18 16:23:52 macachu kernel: ed. 
Jan 18 16:23:52 macachu kernel: __alloc_pages: 2-order allocation failed. 
Jan 18 16:26:46 macachu last message repeated 455 times
Jan 18 16:28:41 macachu last message repeated 123178 times
Jan 18 16:28:55 macachu last message repeated 30800 times
Jan 18 16:28:55 macachu kernel: ed. 

##</code><code>##

Linux macachu 2.4.0-test11 #1 Thu Dec 7 15:51:21 EST 2000 ppc unknown
cpu             : 750
clock           : 400MHz
bogomips        : 796.26
motherboard     : PowerMac1,1 MacRISC Power Macintosh
L2 cache        : 1024K unified
memory          : 192MB