From cbb395b92b08e7e95a277f88474873a5ea5805fb Mon Sep 17 00:00:00 2001
From: Slaven Rezic <slaven@rezic.de>
Date: Fri, 3 May 2019 08:46:55 +0200
Subject: [PATCH] workaround for RT#129403

---
 t/1-basic.t | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/t/1-basic.t b/t/1-basic.t
index b5b3311..8f83b80 100755
--- a/t/1-basic.t
+++ b/t/1-basic.t
@@ -10,7 +10,10 @@ ok("Hello, world" =~ /(?<=Hello|Hi), (world)/);
 is($1, 'world');
 
 no re::engine::PCRE;
-is(eval '"Hello, world" =~ /(?<=Moose|Mo), (world)/', undef);
+{
+    local $TODO = "Does not fail anymore since perl 5.29.x; need another failure case";
+    is(eval '"Hello, world" =~ /(?<=Moose|Mo), (world)/', undef);
+}
 
 if (fork) {
     ok(1);
-- 
2.1.4