Deprecate literal unescaped "{" in regexes.

[perl.git] / t / re / pat.t

diff --git a/t/re/pat.t b/t/re/pat.t
index b34e093..9c29c95 100644 (file)
--- a/t/re/pat.t
+++ b/t/re/pat.t
@@ -152,7 +152,7 @@ sub run_tests {
 
     {
         $_ = 'now is the {time for all} good men to come to.';
-        / {([^}]*)}/;
+        / \{([^}]*)}/;
         is($1, 'time for all', "Match braces");
     }