I would agree with you, yes, that arrays do start from 0 in Perl. However what I was originally trying to do was to get @array1, @array2, etc. build using the loop index. Since my arrays were numbered 1-5, they are correct in their examples ( at least for my problem ).
Some people fall from grace. I prefer a running start...