vi: Substitute multiple lines according the given pattern ?

[viv]

Как заменить в vi во всем файле одну подстроку на другую более менее понятно:

:g/aaaa/s//bbbb/g

И то если в одной строке несколько раз встречается aaaa то замена произойдет только один раз.

А вот как заменить сразу несколько строк удовлетворяющих обределенному patternu ?

Например заменить/удалить из файла все конструкции типа:

CREATE .... INDEX .....
(
...
...
...
);

[Palych]

:g/aaaa/s//bbbb/gm ???

[viv]

:g/aaaa/s//bbbb/gm ???

Не работает

[Palych]

:0,$ s/aaaa/bbbb/gm ??

[theukrainian]

Я использюю VIM (http://vim.sf.net), так что не знаю или работает в vanilla VI

Как заменить в vi во всем файле одну подстроку на другую более менее понятно:

:g/aaaa/s//bbbb/g
И то если в одной строке несколько раз встречается aaaa то замена произойдет только один раз.

:%s/aaaa/bbbb/g заменит все встречающиеся aaaa на bbbb

А вот как заменить сразу несколько строк удовлетворяющих обределенному patternu ?

Например заменить/удалить из файла все конструкции типа:

CREATE .... INDEX .....
(
...
...
...
);

Насчет multiple lines: :help \n. В версиях 6.1+ (или может 6.2+?) можно match multi-line patterns, а удалить их: :%s/blah//g

[idle0]

Как заменить в vi во всем файле одну подстроку на другую более менее понятно:

:g/aaaa/s//bbbb/g

И то если в одной строке несколько раз встречается aaaa то замена произойдет только один раз.

А вот как заменить сразу несколько строк удовлетворяющих обределенному patternu ?

Например заменить/удалить из файла все конструкции типа:

CREATE .... INDEX .....
(
...
...
...
);

Я делаю это примерно так:

Code: Select all

perl -e '@A=<>; $A=join "", @A; $A =~ s /CREATE.*INDEX.*\(.*\)//mg; print $A' < file.sql

Я еще подумаю, можеть быть получится поэлегантнее вариант

[idle0]

Вот v2:

Code: Select all

perl -e '$_=join "", <>; s/CREATE.*INDEX.*\(.*\)//mg; print' < file.sql

[viv]

Спасибо за варианты !

Еще вопрос в догонку как заменить чтото на перевод строки ? И наоборот заменить перевод строку на какое-нибудь слово ? Идея понятна да ?

Снвчала слепить все в одну строку заменить и разбить обратно.

[Palych]

Спасибо за варианты !

Еще вопрос в догонку как заменить чтото на перевод строки ? И наоборот заменить перевод строку на какое-нибудь слово ? Идея понятна да ?

Снвчала слепить все в одну строку заменить и разбить обратно.

:0,$ s/\n/someword/g

[viv]

Спасибо за варианты !

Еще вопрос в догонку как заменить чтото на перевод строки ? И наоборот заменить перевод строку на какое-нибудь слово ? Идея понятна да ?

Снвчала слепить все в одну строку заменить и разбить обратно.

:0,$ s/\n/someword/g

Как ни странно \n воспринимается в vim как обычное n

[Palych]

Спасибо за варианты !

Еще вопрос в догонку как заменить чтото на перевод строки ? И наоборот заменить перевод строку на какое-нибудь слово ? Идея понятна да ?

Снвчала слепить все в одну строку заменить и разбить обратно.

:0,$ s/\n/someword/g

Как ни странно \n воспринимается в vim как обычное n

(tr '\n' '\r'; echo)|sed 's/From/To/g'|tr '\r' '\n' ???

[r00t]

Вот v2:

Code: Select all

perl -e '$_=join "", <>; s/CREATE.*INDEX.*\(.*\)//mg; print' < file.sql

И как эта радость обработает файло вида


CREATE blabala;
select bla;
blabla INDEX bla (
bla bla ;
bla (bla);
bla bla bla );

Вытрет все нафик, или вытрет только часть? И какую часть? А главное зачем, ведь согласно первоначальной идее не должно делать ничего вообще

[idle0]

Вот v2:

Code: Select all

perl -e '$_=join "", <>; s/CREATE.*INDEX.*\(.*\)//mg; print' < file.sql

И как эта радость обработает файло вида


CREATE blabala;
select bla;
blabla INDEX bla (
bla bla ;
bla (bla);
bla bla bla );

Вытрет все нафик, или вытрет только часть? И какую часть? А главное зачем, ведь согласно первоначальной идее не должно делать ничего вообще

Ну так надо поправить немного regexp, я просто хотел продемонстрировать
как делать multi-line search and replace. А так по уму надо SQL парсер на
flex-e замочалить

[r00t]

Ну так надо поправить немного regexp, я просто хотел продемонстрировать
как делать multi-line search and replace. А так по уму надо SQL парсер на
flex-e замочалить

Вот тот-то, что придется парсер писать, а то одним regexp'ом нормально такое неотпарсишь.