diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-07-12 12:29:58 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-07-12 12:29:58 +0000 |
| commit | 3c678d221c45ecc598a0787080aae23781c1945d (patch) | |
| tree | b7602f125e8c9d3505b8357bb49f8da198aeb5b6 /pod/perlintro.pod | |
| parent | b2e2905cd6316367cb36fd419288b5b5df9c574c (diff) | |
| download | perl-3c678d221c45ecc598a0787080aae23781c1945d.tar.gz | |
I prefer array indexes that start from 0 in beginner docs
p4raw-id: //depot/perl@28558
Diffstat (limited to 'pod/perlintro.pod')
| -rw-r--r-- | pod/perlintro.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlintro.pod b/pod/perlintro.pod index 5e5923d8b6..da9c2af032 100644 --- a/pod/perlintro.pod +++ b/pod/perlintro.pod @@ -376,7 +376,7 @@ the more friendly list scanning C<foreach> loop. print "This element is $_\n"; } - print $list[$_] foreach 1 .. $max; + print $list[$_] foreach 0 .. $max; # you don't have to use the default $_ either... foreach my $key (keys %hash) { |