Fix perl5db.t test 41 on VMS.

We're getting newlines in between items, and the easiest way to
deal with it is make them explicit so we expect what we're getting
and it's done the same everywhere.

diff --git a/lib/perl5db.t b/lib/perl5db.t
index 95d2030..9ef7aaa 100644 (file)
--- a/lib/perl5db.t
+++ b/lib/perl5db.t
@@ -1041,13 +1041,13 @@ sub _calc_trace_wrapper
 DebugWrap->new({
     cmds =>
     [
-        'n', 'print "<$x>"',
-        'n', 'print "<$x>"',
+        'n', 'print "<$x>\n"',
+        'n', 'print "<$x>\n"',
         'q',
     ],
     prog => '../lib/perl5db/t/lsub-n',
 })->output_like(
-    qr/<1><11>/,
+    qr/<1>\n<11>\n/,
     'n steps over lvalue subs',
 );