summaryrefslogtreecommitdiff
path: root/t/comp
diff options
context:
space:
mode:
authorJohn Peacock <jpeacock@rowman.com>2004-04-13 16:51:31 -0400
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2004-04-14 07:26:04 +0000
commit13f8f3987335c6eed94bd796ae4e7be8f788fdbf (patch)
tree36257ab1ba4d78ddee06f5aafdecdccc2eb24c25 /t/comp
parent1928965c335b0bc2a3df245c2070b6e4b7bfad99 (diff)
downloadperl-13f8f3987335c6eed94bd796ae4e7be8f788fdbf.tar.gz
's to bring bleadperl up to version-0.39
Message-ID: <407C8B13.9020104@rowman.com> p4raw-id: //depot/perl@22692
Diffstat (limited to 't/comp')
-rwxr-xr-xt/comp/use.t8
1 files changed, 4 insertions, 4 deletions
diff --git a/t/comp/use.t b/t/comp/use.t
index dc3265be06..7bb1cbd6ff 100755
--- a/t/comp/use.t
+++ b/t/comp/use.t
@@ -111,7 +111,7 @@ print "ok ",$i++,"\n";
print "ok ",$i++,"\n";
eval "use lib v100.105";
- unless ($@ =~ /lib version 100.105 \(100\.105\.0\) required--this is only version 35.36 \(35\.360\.0\)/) {
+ unless ($@ =~ /lib version 100.105 \(100\.105\.0\) required--this is only version 35.360 \(35\.360\.0\)/) {
print "not ";
}
print "ok ",$i++,"\n";
@@ -121,7 +121,7 @@ print "ok ",$i++,"\n";
print "ok ",$i++,"\n";
eval "use lib 100.105";
- unless ($@ =~ /lib version 100.105 \(100\.105\.0\) required--this is only version 35.36 \(35\.360\.0\)/) {
+ unless ($@ =~ /lib version 100.105 \(100\.105\.0\) required--this is only version 35.360 \(35\.360\.0\)/) {
print "not ";
}
print "ok ",$i++,"\n";
@@ -132,7 +132,7 @@ print "ok ",$i++,"\n";
print "ok ",$i++,"\n";
eval "use lib v100.105";
- unless ($@ =~ /lib version 100.105 \(100\.105\.0\) required--this is only version 35.36 \(35\.360\.0\)/) {
+ unless ($@ =~ /lib version 100.105 \(100\.105\.0\) required--this is only version 35.360 \(35\.360\.0\)/) {
print "not ";
}
print "ok ",$i++,"\n";
@@ -142,7 +142,7 @@ print "ok ",$i++,"\n";
print "ok ",$i++,"\n";
eval "use lib 100.105";
- unless ($@ =~ /lib version 100.105 \(100\.105\.0\) required--this is only version 35.36 \(35\.360\.0\)/) {
+ unless ($@ =~ /lib version 100.105 \(100\.105\.0\) required--this is only version 35.360 \(35\.360\.0\)/) {
print "not ";
}
print "ok ",$i++,"\n";