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

##</code><code>##

for my $i (0..5) {