diff options
Diffstat (limited to 't/op/taint.t')
| -rw-r--r-- | t/op/taint.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/taint.t b/t/op/taint.t index 9edaa55b03..adb6907a45 100644 --- a/t/op/taint.t +++ b/t/op/taint.t @@ -2378,7 +2378,7 @@ end ok("A" =~ /\p{$prop}/, "user-defined property: non-tainted case"); $prop = "IsA$TAINT"; eval { "A" =~ /\p{$prop}/}; - like($@, qr/Insecure user-defined property \\p\{main::IsA\}/, + like($@, qr/Insecure user-defined property "IsA" in regex/, "user-defined property: tainted case"); } |