for (my $i = 0; $i <= 89; $i++) {
	...
    }