Test -e with arguments.

The previous command line wrapper broke this. For #287
evalEmpire · Jun 11, 2016 · 13ad83d · 13ad83d
1 parent 829c4ab
commit 13ad83d
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/t/command_line_wrapper.t b/t/command_line_wrapper.t
@@ -28,6 +28,8 @@ like `$perl5icmd -h`, qr/disable all warnings/, 'perl5i -h works as expected';
 
 like capture { system @perl5icmd, "-e", '$^X->say' }, qr/perl5i/, '$^X is perl5i';
 
+is capture { system @perl5icmd, "-e", 'say @ARGV', 'foo', 'bar' }, "foobar\n", "-e with args";
+
 is capture { system @perl5icmd, '-wle', q[print 'Hello'] }, "Hello\n", "compound -e";
 
 is capture { system @perl5icmd, "-Minteger", "-e", q[say 'Hello'] }, "Hello\n",