Чем обрезать дески?

Хаюшки! Пипл подскажите чем можно обрезать дески до определенного числа символов ну и чтоб по буквам не обрубал конечно а по словам. Обыскался просто ничего толкового нет.

Обрезай на месте пробела или точки и все.

Не дак мне софтина нужна которая будет обрезать

php:

Код:

preg_match('/^.{0,33}\x20/i', $stroka, $matches); $newstroka = $matches[0];

как-то так, должно обрезать 33 символа до пробела.

в таком случае не факт, что дески получаться читабельными.

Я для всяких операций с десками и текстовыми файлами в большом количестве пользуюсь прогой TextPipe Pro. Она на первый взгляд сложная, но очень мощная прога. Возможно ей это можно сделать.

"Софтина", которая обрезает.

Код:

function SelectFirst($size,$unit,$text) {       [String]::Concat([Regex]::Matches($text,@{'sentences'="[^.!?]+[.!?]+\s*";'words'="\w+\W*\s*";'letters'="(\w|\W)"}[$unit])[0..$($size-1)]) } function SelectFirst2($size,$unit,$path) {    ls $path *.txt | %{sc "$($_.directory)\short-$($_.name)" (SelectFirst $size $unit (gc $_.fullname))   } }