This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Take a larger margin to prevent 'X' failures in smokes
[perl5.git] / t / op / rand.t
index 44bf0ff..eb29ff9 100755 (executable)
 
 BEGIN {
     chdir "t" if -d "t";
-    @INC = '../lib';
+    @INC = qw(. ../lib);
 }
 
 use strict;
 use Config;
-use Test::More tests => 8;
 
+require "test.pl";
+plan(tests => 8);
 
-my $reps = 10000;      # How many times to try rand each time.
+
+my $reps = 15000;      # How many times to try rand each time.
                        # May be changed, but should be over 500.
                        # The more the better! (But slower.)