summaryrefslogtreecommitdiff
path: root/pod/perlop.pod
diff options
context:
space:
mode:
authorKen Williams <ken.williams@thomsonreuters.com>2009-08-11 11:25:07 -0500
committerDavid Mitchell <davem@iabyn.com>2009-08-11 23:29:34 +0100
commitf343f96080e78c71ab2469cb962e36ef6f25bf85 (patch)
tree4a9eb0b78a857654a4a0408284f73c3f6dc7045f /pod/perlop.pod
parent06aa495b2e26cd6963648651410909a6682df5b9 (diff)
downloadperl-f343f96080e78c71ab2469cb962e36ef6f25bf85.tar.gz
Removed '...' ellipses from docs about '...' flip-flop operator
Diffstat (limited to 'pod/perlop.pod')
-rw-r--r--pod/perlop.pod8
1 files changed, 4 insertions, 4 deletions
diff --git a/pod/perlop.pod b/pod/perlop.pod
index 23f62e09ab..1df9fcb305 100644
--- a/pod/perlop.pod
+++ b/pod/perlop.pod
@@ -602,10 +602,10 @@ Examples:
As a scalar operator:
if (101 .. 200) { print; } # print 2nd hundred lines, short for
- # if ($. == 101 .. $. == 200) ...
+ # if ($. == 101 .. $. == 200) { print; }
next LINE if (1 .. /^$/); # skip header lines, short for
- # ... if ($. == 1 .. /^$/);
+ # next LINE if ($. == 1 .. /^$/);
# (typically in a loop labeled LINE)
s/^/> / if (/^$/ .. eof()); # quote body
@@ -615,9 +615,9 @@ As a scalar operator:
$in_header = 1 .. /^$/;
$in_body = /^$/ .. eof;
if ($in_header) {
- # ...
+ # do something
} else { # in body
- # ...
+ # do something else
}
} continue {
close ARGV if eof; # reset $. each file