From: Shlomi Fish <shlomif@vipe.technion.ac.il>
Date: Tue, 15 Jun 2004 10:15:15 +0000 (+0300)
Subject: perlop.pod: add an example to the .. and ... operators
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=acf31ca582944c8bb9501bdc43ade24d8a322e8a;p=p5sagit%2Fp5-mst-13.2.git

perlop.pod: add an example to the .. and ... operators
Message-ID: <Pine.LNX.4.56.0406151013140.14618@vipe.technion.ac.il>

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

diff --git a/pod/perlop.pod b/pod/perlop.pod
index 4430fe7..6f8e2dd 100644
--- a/pod/perlop.pod
+++ b/pod/perlop.pod
@@ -532,7 +532,27 @@ As a scalar operator:
         close ARGV if eof;             # reset $. each file
     }
 
-As a list operator:
+Here's a simple example to illustrate the difference between
+the two range operators:
+
+    @lines = ("   - Foo",
+              "01 - Bar",
+              "1  - Baz",
+              "   - Quux");
+
+    foreach(@lines)
+    {
+        if (/0/ .. /1/)
+        {
+            print "$_\n";
+        }
+    }
+
+This program will print only the line containing "Bar". If 
+the range operator is changed to C<...>, it will also print the 
+"Baz" line.
+
+And now some examples as a list operator:
 
     for (101 .. 200) { print; }	# print $_ 100 times
     @foo = @foo[0 .. $#foo];	# an expensive no-op