Replace system by print in strictures/parsing regression test

(so we're not annoyed by shell messages)

diff --git a/t/lib/strict/subs b/t/lib/strict/subs
index 25c6543..4c88021 100644 (file)
--- a/t/lib/strict/subs
+++ b/t/lib/strict/subs
@@ -423,9 +423,12 @@ EXPECT
 
 ########
 use strict 'subs';
-sub sayfoo { print "foo:@_\n" }
-system sayfoo "bar";
-system sayfoo . "bar";
+sub sayfoo { print "foo:@_\n" ; "ret\n" }
+print sayfoo "bar";
+print sayfoo . "bar\n";
 EXPECT
 foo:bar
+ret
 foo:
+ret
+bar