From: Mark-Jason Dominus <mjd@plover.com>
Date: Thu, 4 Apr 2002 15:59:39 +0000 (+0000)
Subject: Message-Id: <20020404155939.6754.qmail@plover.com>
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=48a4adce78f82628cab52354093080eff32451c1;p=p5sagit%2Fp5-mst-13.2.git

Message-Id: <20020404155939.6754.qmail@plover.com>

p4raw-id: //depot/perl@15732
---

diff --git a/pod/perlfaq9.pod b/pod/perlfaq9.pod
index 242bd49..947c769 100644
--- a/pod/perlfaq9.pod
+++ b/pod/perlfaq9.pod
@@ -251,9 +251,9 @@ function to handle encoding.
 The best source of detailed information on URI encoding is RFC 2396.
 Basically, the following substitutions do it:
 
-    s/([^\w()'*~!.-])/sprintf '%%%02x', $1/eg;   # encode
+    s/([^\w()'*~!.-])/sprintf '%%%02x', ord $1/eg;   # encode
 
-    s/%([A-Fa-f\d]{2})/chr hex $1/eg;            # decode
+    s/%([A-Fa-f\d]{2})/chr hex $1/eg;                # decode
 
 However, you should only apply them to individual URI components, not
 the entire URI, otherwise you'll lose information and generally mess