summaryrefslogtreecommitdiff
path: root/t/op/do.t
diff options
context:
space:
mode:
authorAbhijit Menon-Sen <ams@wiw.org>2001-09-22 10:02:34 +0000
committerAbhijit Menon-Sen <ams@wiw.org>2001-09-22 10:02:34 +0000
commit83240b2c29db6229dacef05064a026a4843b3e11 (patch)
treed57dc1e7651469fabc13038f79634713a23fe8ca /t/op/do.t
parent5e76a0e22d491fe53448ba9354da709fef4051d1 (diff)
downloadperl-83240b2c29db6229dacef05064a026a4843b3e11.tar.gz
Removed duplicated tests #19 and #20.
p4raw-id: //depot/perl@12126
Diffstat (limited to 't/op/do.t')
-rwxr-xr-xt/op/do.t8
1 files changed, 0 insertions, 8 deletions
diff --git a/t/op/do.t b/t/op/do.t
index 1d6fb90ef0..913481feb1 100755
--- a/t/op/do.t
+++ b/t/op/do.t
@@ -87,14 +87,6 @@ ok( !$@ );
eval qq{ do uc qq(a file that does not exist); };
ok( !$@ );
-eval qq{ do qq(a file that does not exist); };
-print "not " if $@;
-print "ok 19\n";
-
-eval qq{ do uc qq(a file that does not exist); };
-print "not " if $@;
-print "ok 20\n";
-
END {
1 while unlink("$$.16", "$$.17", "$$.18");
}