From: Father Chrysostomos <sprout@cpan.org>
Date: Thu, 28 Jun 2012 04:32:08 +0000 (-0700)
Subject: perldiag: Add missing regexp delims
X-Git-Tag: v5.17.2~170
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/f9d4ccdc4830e30952502e4f7fa821786d59bfe0?ds=sidebyside

perldiag: Add missing regexp delims
---

diff --git a/pod/perldiag.pod b/pod/perldiag.pod
index d18279f..f686174 100644
--- a/pod/perldiag.pod
+++ b/pod/perldiag.pod
@@ -1449,13 +1449,13 @@ will match.
 
 This may be counterintuitive at times, as both these fail:
 
- chr(0x110000) =~ \p{ASCII_Hex_Digit=True}      # Fails.
- chr(0x110000) =~ \p{ASCII_Hex_Digit=False}     # Also fails!
+ chr(0x110000) =~ /\p{ASCII_Hex_Digit=True}/      # Fails.
+ chr(0x110000) =~ /\p{ASCII_Hex_Digit=False}/     # Also fails!
 
 and both these succeed:
 
- chr(0x110000) =~ \P{ASCII_Hex_Digit=True}      # Succeeds.
- chr(0x110000) =~ \P{ASCII_Hex_Digit=False}     # Also succeeds!
+ chr(0x110000) =~ /\P{ASCII_Hex_Digit=True}/      # Succeeds.
+ chr(0x110000) =~ /\P{ASCII_Hex_Digit=False}/     # Also succeeds!
 
 =item %s: Command not found