for ($_ = 0; $_ < @values; ++$_) { ... }