diff --git a/t/run/switches.t b/t/run/switches.t index aa8d9c5427c9..cd8aec5bb1c6 100644 --- a/t/run/switches.t +++ b/t/run/switches.t @@ -12,7 +12,7 @@ BEGIN { BEGIN { require "./test.pl"; require "./loc_tools.pl"; } -plan(tests => 137); +plan(tests => 136); use Config; @@ -693,11 +693,6 @@ $r = runperl( ); is( $r, "Hello, world!\n", "-E ~~" ); -$r = runperl( - switches => [ '-E', '"no warnings q{experimental::smartmatch}; given(undef) {when(undef) { say q(Hello, world!)"}}'] -); -is( $r, "Hello, world!\n", "-E given" ); - $r = runperl( switches => [ '-nE', q("} END { say q/affe/") ], stdin => 'zomtek',