The UNIX and Linux Forums  

Go Back   В UNIX и Linux Форумы > Топ форумы > Shell программирование и сценарии
.
Google unix.com



Shell программирование и сценарии Почтовые вопросы о KSH, CSH, SH, BASH, Perl, PHP, SED, AWK и скрипты оболочки и оболочки скриптовых языков здесь.

Подробнее UNIX и Linux Темы форума можно найти полезные
Нить Резьба для начинающих Форум Ответы Последнее сообщение
Нужна замена для SED dbsurf Shell программирование и сценарии 0 01-25-2008 06:47 PM
Что касается Замена rajx UNIX для чайников Вопросы И Ответы 2 05-22-2007 10:19 AM
String замена Perl Lindarella Shell программирование и сценарии 4 09-29-2006 03:05 PM
Замена использования СЭД handak9 UNIX для чайников Вопросы И Ответы 5 07-13-2004 12:28 PM
Замена процессора. помощь IMPTRUE UNIX для чайников Вопросы И Ответы 3 07-25-2003 09:40 AM

Closed Thread
English Japanese Spanish French German Portuguese Italian Dutch Swedish Russian Norwegian Hungarian Hebrew Danish Bulgarian Greek Powered By Powered by Google
 
LinkBack Резьба Инструменты Искать в этом Thread Оценить Thread Режимы дисплея
Old 01-25-2008
dbsurf dbsurf is offline
Зарегистрированный пользователь
  
 

Регистрация: Январь 2008
Сообщений: 23
Замена СЕПГ с Perl

Привет, используя ниже CMD Я выявления wheether последнего символа в каждой строке в тысячах файлы с запятой или not.If последний символ запятой я удалить запятой. Если последний символ запятой, не то я добавить следующую строку к настоящему разделу.

Например моей входной файл состоит из

ABC | FGH | HJK | JKK;
BHJ | AAA | BBB | L
NNNN | JJJJ | LLLL;
JJJJJJ;
из положить файл состоит из
ABC | FGH | HJK | JKK
BHJ | AAA | BBB | L NNNN | JJJJ | LLLL
JJJJJ
Я достижения вышеуказанного требования с помощью SED ниже

SED -E:-е'/;$/! N; S / \ N / /; TA '-E' S /;$//' файл

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

Может ли кто-нибудь заменит вышеуказанные требования Perl с xargs

как xargs Perl опция

CN никому предложить самый простой способ без цикл
Old 01-25-2008
Джим Макнамара jim mcnamara is offline Forum Staff  
...@...
  
 

Регистрация: Февраль 2004
Местонахождение: Н. М.
Сообщения: 5805
Как насчет SED:

Код:
sed -e :a -e '/$;/N; s/\\\n//; s/$;//; ta'  oldfile > newfile

Old 01-25-2008
dbsurf dbsurf is offline
Зарегистрированный пользователь
  
 

Регистрация: Январь 2008
Сообщений: 23
Привет Джим,

Приведенный выше код работает с SED но потребляющих слишком много времени .. можно обеспечить то же самое с Perl синтаксиса.
Функциональность она должна определить последний символ в каждой строке все файлы, как он основывает semicolon.if запятой, как она должна заменить словами пробел иначе нужно добавить следующую строку с нынешней.
Old 01-25-2008
KevinADC KevinADC is offline Forum Advisor  
Зарегистрированный пользователь
  
 

Регистрация: Январь 2008
Сообщений: 731
см. другой нити
Old 01-25-2008
dbsurf dbsurf is offline
Зарегистрированный пользователь
  
 

Регистрация: Январь 2008
Сообщений: 23
CN никому сообщить мне решение для замены SED с Perl в приведенном выше
Closed Thread

Закладки

Резьба Инструменты Искать в этом Thread
Искать в этом Thread:

Расширенный поиск
Режимы дисплея Оценить эту ветку
Оценить эту ветку:

Отправка Правила
Вы не может Начать новую нитей
Вы не может Почтовые ответы
Вы не может Почтовые вложения
Вы не может Редактировать Ваши сообщения

BB код быть На
Смайлики являемся На
[IMG] код На
HTML-код Вне
Trackbacks являемся На
Pingbacks являемся На
Refbacks являемся На




Часовой пояс GMT -4. Текущее время 06:05 PM.


Powered By: Справка, Copyright © 2000 - 2006, Jelsoft Enterprises Limited. Язык Переводы на питание от .
vBCredits v1.4 Copyright © 2007 - 2008, PixelFX Studios
В UNIX и Linux форумы Содержание Copyright © 1993-2009. Все права Reserved.Ad управления по RedTyger

Содержание соответствующие URL-адреса в vBSEO 3.2.0