Typo correction in perldebguts.pod

[p5sagit/p5-mst-13.2.git] / pod / perlrequick.pod

diff --git a/pod/perlrequick.pod b/pod/perlrequick.pod
index 5b72a35..1b483c0 100644 (file)
--- a/pod/perlrequick.pod
+++ b/pod/perlrequick.pod
@@ -219,11 +219,11 @@ boundary.
 
 =head2 Matching this or that
 
-We can match match different character strings with the B<alternation>
+We can match different character strings with the B<alternation>
 metacharacter C<'|'>.  To match C<dog> or C<cat>, we form the regex
 C<dog|cat>.  As before, perl will try to match the regex at the
 earliest possible point in the string.  At each character position,
-perl will first try to match the the first alternative, C<dog>.  If
+perl will first try to match the first alternative, C<dog>.  If
 C<dog> doesn't match, perl will then try the next alternative, C<cat>.
 If C<cat> doesn't match either, then the match fails and perl moves to
 the next position in the string.  Some examples: