Tagli a 2500 caratteri.
vedi se $stringa[2500]=" " allora sei ok.
Altrimenti fai un while a ritroso finchè trovi uno spazio " ".
Tieni l'indice e tronchi fino all'indice.