[PHP]Usuwanie ostatnich 5 linii z pliku... Opcje

[kuba_pilach]

Witam!
Dam kawałek kodu:

[PHP] pobierz, plaintext 
elseif($four==1140) {
unset($plik[0]);
unset($plik[1]);
unset($plik[2]);
unset($plik[3]);
unset($plik[4]);
unset($plik[5]);
unset($plik[6]);
unset($plik[7]);
unset($plik[8]);
unset($plik[9]);
unset($plik[10]);
unset($plik[11]);
unset($plik[12]);
unset($plik[13]);
unset($plik[14]);
unset($plik[15]);
unset($plik[16]);
unset($plik[17]);
unset($plik[18]);
unset($plik[19]);
unset($plik[20]);
unset($plik[21]);
unset($plik[22]);
unset($plik[23]);
unset($plik[24]);
unset($plik[25]);
unset($plik[26]);
unset($plik[27]);
unset($plik[28]);
unset($plik[29]);
unset($plik[30]);
 
foreach($plik as $stareDane) {
if($m!==true) {
$fp = fopen($name, "w+");
fclose($fp);
 
// otwarcie pliku do zapisu
$fp = fopen($name, "r+");
// zapisanie danych
$pismo = ':20:
:25:'.$numer;
fputs($fp, $pismo);
fclose($fp);
$m=true;
}
 
$stareDane = str_replace('"', '', $stareDane);
$stareDane = str_replace("'", "", $stareDane);
$stareDanex = explode(';', $stareDane);
$data1 = str_replace('-','', $stareDanex[0]);
$data1 = substr($data1, 2);
 
$data2 = str_replace('-','', $stareDanex[1]);
$data2 = substr($data2, 2);
 
$t = substr($stareDanex[6], 0, 1);
if($t == '-') {
	$kwota = substr($stareDanex[6], 1);
	$typ = 'D';
} else {
	$kwota = $stareDanex[6];
	$typ = 'C';
}
 
$waluta = 'N';
$nadawca = str_replace('        ','', $stareDanex[3]);
if (strlen($stareDanex[5]) == 0) {
	$opis = $stareDanex[2];
}
else {
$opis = $stareDanex[5];
}
$numer = $stareDanex[4];
$numer = str_replace(' ','', $numer);
$tekst='
:61:'.$data1.$data2.$typ.$waluta.$kwota.'NTRFNONREF//
:86:
<20'.$opis.'
<27'.$nadawca.'
<38'.$numer;
// :61:1007290729CN158,60
// echo $tekst;
// zapisanie nowych danych
 
// otwarcie pliku do zapisu
$fp = fopen($name, "r+");
 
// zapisanie danych
fputs($fp, $tekst);
 
// zamknięcie pliku
fclose($fp);
}
}
[PHP] pobierz, plaintext 

Wcześniej mam deklarację zmiennych:

[PHP] pobierz, plaintext 
//odczytanie danych
$plik = file($name);
$stareDane = fread($fp, filesize($name));
[PHP] pobierz, plaintext 

I niby wszystko łatwe i w porządku ale wychodzi mi zamiast

Kod

:20:
:25:PL53105017641000002304111590

-- to kilka razy --
:61:1007290729CN158,60
<20obsluga księgowa Jolanta Piankowski Sopot ul Poniatowskieg 6 miesiac lipiec
<27 PIANKOWSKI JOLANTA ul. Ks.J.Poniatowskiego 6 81-724 SOPOT
<38 57191010482216995882360001

To wychodzi mi:

Kod

:61:przypadku wystąpienia niezgodności w przesłanym zestawieniu w zakresie wykonywanych operacji na rachunku, salda rachunku, prosimy o kontakt z multilinią.CNNTRFNONREF//
:86:
<20
<27
<3845021178527813114020170000410207457825

Moje wnioski są następujące: ostatnie 5 linijek przeszkadza operacji... Pomoże ktoś?