Next Making Programs Faster 103

1+1=0

     sub preallocate {
         my (@c);
         $#c = 99999;
         for (my $i; $i < 100000; $i++) {
             $c[$i] = rand;
         }
     }

Next Copyright © 2003 M. J. Dominus