Increase the repetitions

Message-ID: <20010903062413.B9233@blackrider>

p4raw-id: //depot/perl@11837

diff --git a/t/op/rand.t b/t/op/rand.t
index e365e59..aa2421b 100755 (executable)
--- a/t/op/rand.t
+++ b/t/op/rand.t
@@ -25,11 +25,7 @@ use Config;
 
 print "1..11\n";
 
-srand;                 # Shouldn't need this with 5.004...
-                       # But I'll include it now and test for
-                       # whether we needed it later.
-
-my $reps = 1000;       # How many times to try rand each time.
+my $reps = 10000;      # How many times to try rand each time.
                        # May be changed, but should be over 500.
                        # The more the better! (But slower.)