[perlfaq6] detypo: (?!<) shoulbe be replaced by (?<!)

Hello,

I found a typo in perlfaq6.
Here is a patch against its revision 1.22.

--- perlfaq6.pod~	Wed May 05 10:47:36 2004
+++ perlfaq6.pod	Wed May 05 10:49:12 2004
@@ -748,14 +748,14 @@
 Goldberg:
 
 	$martian =~ m/
-	   (?!<[A-Z])
+	   (?<![A-Z])
 	   (?:[A-Z][A-Z])*?
 	   GX
 	/x;
 
 This succeeds if the "martian" character GX is in the string, and fails
-otherwise.  If you don't like using (?!<), you can replace (?!<[A-Z])
-with (?:^|[^A-Z]).
+otherwise.  If you don't like using (?<!), a zero-width negative
+look-behind assertion, you can replace (?<![A-Z]) with (?:^|[^A-Z]).
 
 It does have the drawback of putting the wrong thing in $-[0] and $+[0],
 but this usually can be worked around.
#End of patch

Thank you.
SADAHIRO Tomoyuki