Change 28558 by [EMAIL PROTECTED] on 2006/07/12 12:29:58

        I prefer array indexes that start from 0 in beginner docs

Affected files ...

... //depot/perl/pod/perlintro.pod#12 edit

Differences ...

==== //depot/perl/pod/perlintro.pod#12 (text) ====
Index: perl/pod/perlintro.pod
--- perl/pod/perlintro.pod#11~28554~    2006-07-12 02:40:14.000000000 -0700
+++ perl/pod/perlintro.pod      2006-07-12 05:29:58.000000000 -0700
@@ -376,7 +376,7 @@
         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) {
End of Patch.

Reply via email to