diff options
| author | jkeenan <jkeenan@cpan.org> | 2011-11-19 20:19:56 -0500 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-11-22 16:27:21 -0800 |
| commit | 2fe1f0f514f958ad10b72a18064180f210b9dbe0 (patch) | |
| tree | 6e132311717aacb157d42a4ca711732c25bb3db2 /t/re/regexp.t | |
| parent | 94e1fbaee725f13ea11dbd183be96755562bbbc5 (diff) | |
| download | perl-2fe1f0f514f958ad10b72a18064180f210b9dbe0.tar.gz | |
[RT #36079] Convert ` to '.
Diffstat (limited to 't/re/regexp.t')
| -rw-r--r-- | t/re/regexp.t | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/t/re/regexp.t b/t/re/regexp.t index 815b877a96..3e5c6f8740 100644 --- a/t/re/regexp.t +++ b/t/re/regexp.t @@ -168,7 +168,7 @@ EOFCODE } chomp( my $err = $@ ); if ($result eq 'c') { - if ($err !~ m!^\Q$expect!) { print "not ok $test$todo (compile) $input => `$err'\n"; next TEST } + if ($err !~ m!^\Q$expect!) { print "not ok $test$todo (compile) $input => '$err'\n"; next TEST } last; # no need to study a syntax error } elsif ( $skip ) { @@ -180,7 +180,7 @@ EOFCODE next TEST; } elsif ($@) { - print "not ok $test$todo $input => error `$err'\n", _comment("$code\n$@\n"); next TEST; + print "not ok $test$todo $input => error '$err'\n", _comment("$code\n$@\n"); next TEST; } elsif ($result =~ /^n/) { if ($match) { print "not ok $test$todo ($study) $input => false positive\n"; next TEST } @@ -189,12 +189,12 @@ EOFCODE if (!$match || $got ne $expect) { eval { require Data::Dumper }; if ($@) { - print "not ok $test$todo ($study) $input => `$got', match=$match\n", _comment("$code\n"); + print "not ok $test$todo ($study) $input => '$got', match=$match\n", _comment("$code\n"); } else { # better diagnostics my $s = Data::Dumper->new([$subject],['subject'])->Useqq(1)->Dump; my $g = Data::Dumper->new([$got],['got'])->Useqq(1)->Dump; - print "not ok $test$todo ($study) $input => `$got', match=$match\n", _comment("$s\n$g\n$code\n"); + print "not ok $test$todo ($study) $input => '$got', match=$match\n", _comment("$s\n$g\n$code\n"); } next TEST; } |