diff options
Diffstat (limited to 't/op/eval.t')
| -rw-r--r-- | t/op/eval.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/op/eval.t b/t/op/eval.t index 98fbc1e51c..ff5004eae5 100644 --- a/t/op/eval.t +++ b/t/op/eval.t @@ -526,6 +526,8 @@ if (eval "use Devel::Peek; 1;") { my $in = <IN>; my ($first, $second) = split (/\*\*\*\*\*\*\n/, $in, 2); $first =~ s/,pNOK//; + s/ PV = 0x[0-9a-f]+/ PV = 0x/ foreach $first, $second; + s/ LEN = [0-9]+/ LEN = / foreach $first, $second; $ok = 1 if ($first eq $second); } } |