Главная страница


ru.linux

 
 - RU.LINUX ---------------------------------------------------------------------
 From : Victor Wagner                        2:5020/400     22 Feb 2002  17:27:18
 To : Sergey Zhlobo
 Subject : Re: sed, fold, sort... etc
 -------------------------------------------------------------------------------- 
 
 Sergey Zhlobo <Sergey.Zhlobo@p17.f1718.n5020.z2.fidonet.org> wrote:
 
 SZ> In article <1014073044@p10.f741.n5030.z2>, Anatoliy Kulakov wrote:
 >> Hужно отбросить все слова в строчках в файле не влезающие в 80 символов.
 >> Уверен что это легко делатся, но как не знаю.
 >> Как-нить там через всякие fold, sort, uniq, cat split делается... Подскажите
 >> плз. как нужно ! 
 
 SZ> cat file.txt |perl -ne 'print $_ if length($_) >= 80;'
 
 опять не то. Во-первых
 perl -ne 'print $_ if length($_) >= 80;' file.txt
   
 Зачем тебе лишний процесс cat?
 
 Во-вторых, раз уж пошла такая пьянка,
 то 
 
 perl -pe  's/(.{1,79}\S)\b.*/$1/' file.txt
 
 Данный вариант плох тем, что пожрет знаки препинания (поскольку \b
 поматчится _перед_ ними. Для русского текста мне еще -Mlocale
 потребовалось.
 -- 
 http://www.communiware.ru                     http://www.ice.ru/~vitus
 --- ifmail v.2.15dev5
  * Origin: Communiware.net (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 Re: sed, fold, sort... etc   Victor Wagner   22 Feb 2002 17:27:18 
Архивное /ru.linux/15178c992896c.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional