Problem z textem Opcje

[kirov]

Mam pewien problem, otóż nie wiem w jaki sposób napisać taki skrypt:

Załóżmy że zmienna text to text o długości 1568 znaków
potrzebóje podzielić go na texty od 0-630 znaków a potem od 630-1260 znaków i tak do końca a później zapisać text1.. text2

Jest jakaś pętla na to?

Zrobiłem to ale bez pętli:

$art = substr(($text),0,630);
$arti = fopen("$text1".".dat", "w");
fputs ($arti, "$art");
fclose ($arti);

Potrzebuję na to pętle która w zależności od długości tekstu będzie go dzielić na kawałki o długości 630 znaków i zapisywać w plikach tekstowych 1, 2 , 3 ,4