projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Re: Why *not* use UNIVERSAL qw( isa can ) ; ??
[p5sagit/p5-mst-13.2.git]
/
t
/
op
/
rand.t
diff --git
a/t/op/rand.t
b/t/op/rand.t
index
44bf0ff
..
060d46a
100755
(executable)
--- a/
t/op/rand.t
+++ b/
t/op/rand.t
@@
-17,12
+17,14
@@
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.