for (my $i=$odd1; $i != $odd2;$i=$i+$step)  {}