diff options
| author | Yves Orton <demerphq@gmail.com> | 2016-10-19 17:15:44 +0200 |
|---|---|---|
| committer | Yves Orton <demerphq@gmail.com> | 2016-10-19 17:15:49 +0200 |
| commit | 13627b93c0f303e40235c233fdd0341ed68ecdb9 (patch) | |
| tree | e8070ad692bb909c62fbfce19cea0e55d76b0142 /ext/re | |
| parent | 7acf604d4a195220d15ef235b9ed4b3be17f6f92 (diff) | |
| download | perl-13627b93c0f303e40235c233fdd0341ed68ecdb9.tar.gz | |
t/regop.t: improve test name
Diffstat (limited to 'ext/re')
| -rw-r--r-- | ext/re/t/regop.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/re/t/regop.t b/ext/re/t/regop.t index f75e5413ff..54a197b3a1 100644 --- a/ext/re/t/regop.t +++ b/ext/re/t/regop.t @@ -23,7 +23,7 @@ shift @tests plan( @tests + 2 + ( @strs - grep { !$_ or /^---/ } @strs )); is( scalar @tests, $NUM_SECTS, - "Expecting output for $NUM_SECTS patterns" ); + "Expecting output for $NUM_SECTS patterns, got ". scalar(@tests) ); ok( defined $out, 'regop.pl returned something defined' ); $out ||= ""; |