From 82c44e3364eb3c4078c422ac12fbcf5ac46c2ce7 Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 23 Jun 2003 04:55:39 +0000
Subject: Test tweaks for VMS from Craig Berry.

p4raw-id: //depot/perl@19845
---
 lib/strict.t | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/strict.t')

diff --git a/lib/strict.t b/lib/strict.t
index b153771cb7..b5911b3708 100644
--- a/lib/strict.t
+++ b/lib/strict.t
@@ -36,7 +36,7 @@ foreach (sort glob($^O eq 'MacOS' ? ":lib:strict:*" : "lib/strict/*")) {
 
 undef $/;
 
-print "1..", @prgs + 4, "\n";
+print "1.." . (@prgs + 4) . "\n";
  
  
 for (@prgs){
@@ -94,7 +94,7 @@ for (@prgs){
         print STDERR "GOT:\n$results\n";
         print "not ";
     }
-    print "ok ", ++$i, "\n";
+    print "ok " . ++$i . "\n";
     foreach (@temps) 
 	{ unlink $_ if $_ } 
 }
-- 
cgit v1.2.1