Correct misleading example in perlsyn.pod (given/when/default)

Message-ID: <47D73DA3.8050300@perltraining.com.au>

p4raw-id: //depot/perl@33488

diff --git a/pod/perlsyn.pod b/pod/perlsyn.pod
index e1d6464..44c4f1a 100644 (file)
--- a/pod/perlsyn.pod
+++ b/pod/perlsyn.pod
@@ -634,7 +634,7 @@ case to the next:
     given($foo) {
        when (/x/) { say '$foo contains an x'; continue }
        when (/y/) { say '$foo contains a y' }
-       default    { say '$foo contains neither an x nor a y' }
+       default    { say '$foo does not contain a y' }
     }
 
 =head3 Switching in a loop