while ($x = $iter->next) { next if $x > $threshold; $x -= $correction; }