for ($i = 0; $i < scalar @array; $i++) { ... }