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

##</code><code>##

for my $i (0..33) {