for ( my ___ = ___ ; $same < ___ ; ++$same )