Make sure temp file has an extension on VMS to work with the new

temp file name generator in t/test.pl

p4raw-id: //depot/perl@34315

diff --git a/t/comp/multiline.t b/t/comp/multiline.t
index 1af76fc..0409f8b 100755 (executable)
--- a/t/comp/multiline.t
+++ b/t/comp/multiline.t
@@ -42,7 +42,8 @@ is($z, $y,  'basic multiline reading');
 is($count, 7,   '    line count');
 is($., 7,       '    $.' );
 
-$out = (($^O eq 'MSWin32') || $^O eq 'NetWare' || $^O eq 'VMS') ? `type $filename`
+$out = (($^O eq 'MSWin32') || $^O eq 'NetWare') ? `type $filename`
+    : ($^O eq 'VMS') ? `type $filename.;0`   # otherwise .LIS is assumed
     : ($^O eq 'MacOS') ? `catenate $filename`
     : `cat $filename`;