Как удалить последнюю строку текстового файла?

[inververs]

ArtInt
Я показал как удаляются строки. Если же работаете с файлом, то можно сделать так:

$sFileName = '1.txt'
$hFile = FileOpen($sFileName)
$sData = FileRead($hFile)
$sData = StringRegExpReplace($sData, '(?:^|\r\n)[^\r\n]*\Z', '')
FileClose($hFile)
$hFile = FileOpen($sFileName,2)
FileWrite($hFile,$sData)
FileClose($hFile)