[perl #96228] perlop misdocuments ${ qr/x/ } as undef

diff --git a/pod/perlop.pod b/pod/perlop.pod
index f9d80d3..9e83c52 100644 (file)
--- a/pod/perlop.pod
+++ b/pod/perlop.pod
@@ -1308,8 +1308,10 @@ in C<m/PATTERN/>.  If "'" is used as the delimiter, no interpolation
 is done.  Returns a Perl value which may be used instead of the
 corresponding C</STRING/msixpodual> expression. The returned value is a
 normalized version of the original pattern. It magically differs from
-a string containing the same characters: C<ref(qr/x/)> returns "Regexp",
-even though dereferencing the result returns undef.
+a string containing the same characters: C<ref(qr/x/)> returns "Regexp";
+however, dereferencing it is not well defined (you currently get the 
+normalized version of the original pattern, but this may change).
+
 
 For example,