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