for (my $i = 0; $i <= 4; $i++) {

##</code><code>##

for my $i ( 0 .. 4 ) {