[Comm] regexp по дереву исходников.

[Comm] regexp по дереву исходников.

[vic ismakaev]

Необходимо в каталоге с исходниками в куче файлов заменить одну строку другой.
Как это сделать по аналогии 
perl -pi -e "s#str1#str2#" somefile
но рекурсивно по всему дереву каталогов?

-- 
С уважением
Виктор В Исмакаев

Re: [Comm] regexp по дереву исходников.

[Sergey Degtyaryov]

Доброго дня, vic ismakaev.
Wed, 25 Dec 2002 17:15:10 +0500  Вы сказали буквально следующее:

> Необходимо в каталоге с исходниками в куче файлов заменить одну строку другой.
> Как это сделать по аналогии 
> perl -pi -e "s#str1#str2#" somefile
> но рекурсивно по всему дереву каталогов?


perldoc File::Find

-- 
Rgds, Сергей Дегтярев
[maga@localhost]$ /usr/games/fortune
Липа - это сосна, внесенная в отчет как дуб. 

Re: [Comm] regexp по дереву исходников.

[Sergey Vlasov]

On Wed, 25 Dec 2002 17:15:10 +0500
vic ismakaev <viclists@mail.esoo.ru> wrote:

> Необходимо в каталоге с исходниками в куче файлов заменить одну строку другой.
> Как это сделать по аналогии 
> perl -pi -e "s#str1#str2#" somefile
> но рекурсивно по всему дереву каталогов?

find /some/dir -type f -print0 | xargs -r0 perl -pi -e 's#str1#str2#' --

[Comm] Re: regexp по дереву исходников.

[Alexey Tourbin]

[-- Attachment #1: Type: text/plain, Size: 381 bytes --]

On Wed, Dec 25, 2002 at 05:15:10PM +0500, vic ismakaev wrote:
> Необходимо в каталоге с исходниками в куче файлов заменить одну строку другой.
> Как это сделать по аналогии 
> perl -pi -e "s#str1#str2#" somefile
> но рекурсивно по всему дереву каталогов?

find -type f -name '*.[ch]' -print 0 | xargs -r0 -- perl -pi -e "s#str1#str2#g"

-- 
WBR, Alexey Tourbin
BIOZAK Ltd., Russia

[-- Attachment #2: Type: application/pgp-signature, Size: 189 bytes --]

Re: [Comm] regexp по дереву исходников.

[Myroslav M. Rozum]

> Необходимо в каталоге с исходниками в куче файлов заменить одну строку
> другой. Как это сделать по аналогии
> perl -pi -e "s#str1#str2#" somefile
> но рекурсивно по всему дереву каталогов?
Может подставить вместо somefile - `find $DIR -print` ?

но - честно, говоря, именно ваш примерчик не пробовал :)
-- 
Best regards,
Myroslav M. Rozum 

[Comm] Re: regexp по дереву исходников.

[Alexey Tourbin]

[-- Attachment #1: Type: text/plain, Size: 506 bytes --]

On Wed, Dec 25, 2002 at 03:24:50PM +0300, Alexey Tourbin wrote:
> On Wed, Dec 25, 2002 at 05:15:10PM +0500, vic ismakaev wrote:
> > Необходимо в каталоге с исходниками в куче файлов заменить одну строку другой.
> > Как это сделать по аналогии 
> > perl -pi -e "s#str1#str2#" somefile
> > но рекурсивно по всему дереву каталогов?
> 
> find -type f -name '*.[ch]' -print 0 | xargs -r0 -- perl -pi -e "s#str1#str2#g"
                              ^^^^^^^^
-print0

-- 
WBR, Alexey Tourbin
BIOZAK Ltd., Russia

[-- Attachment #2: Type: application/pgp-signature, Size: 189 bytes --]

Re: [Comm] regexp по дереву исходников.

[Myroslav M. Rozum]

блин, сорри.
-- 
Myroslav M. Rozum

Re: [Comm] regexp по дереву исходников.

[vic ismakaev]

25 Декабрь 2002 17:15, vic ismakaev написал:
> Необходимо в каталоге с исходниками в куче файлов заменить одну строку
> другой. Как это сделать по аналогии
> perl -pi -e "s#str1#str2#" somefile
> но рекурсивно по всему дереву каталогов?
Спасибо всем за помощь.
Воспользовался рецептом Сергея Власова.
-- 
С уважением
Виктор В Исмакаев