X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/9cefd268f0a1c07e6746eef1c037efc657387f21..11d7de88d35184d288f54028ef5ae07962378fb1:/ext/Devel-Peek/t/Peek.t

diff --git a/ext/Devel-Peek/t/Peek.t b/ext/Devel-Peek/t/Peek.t
index 785d3bd..e275526 100644
--- a/ext/Devel-Peek/t/Peek.t
+++ b/ext/Devel-Peek/t/Peek.t
@@ -86,7 +86,7 @@ sub do_test {
 	    $pattern =~ s/\$RV/
 		($] < 5.011) ? 'RV' : 'IV';
 	    /mge;
-	    $pattern =~ s/^\h+COW_REFCNT = \d+\h*\n//mg
+	    $pattern =~ s/^\h+COW_REFCNT = .*\n//mg
 		if $Config{ccflags} =~
 			/-DPERL_(?:OLD_COPY_ON_WRITE|NO_COW)/;