Много поиск строки и инструмент замены [закрываются]

cd $PROJECTDIR && find . -iname '*.*' -exec vim -c 's:^first line of text\nsecond line of text\n3rd line of text:new 1st line\rnew 2nd\rnew 3rd:' -c 'w!' -c 'q' {} \;

HTH

RegexSearch немного ужасен, но очень полезный инструмент для просто этого вида вещи.

Лучший инструмент, который я нашел, является частью бесплатного программного обеспечения, названного BK ReplaceEm. Интерфейс берет немного привыкающее к, но стоит изучить, как использовать его. Инструмент очень мощен и позволяет Вам делать многострочные замены или без регулярных выражений.

Ультраредактирование может сделать это. Я расстался с деньгами для него.

существует учебное руководство на многострочной находке & замена , который можно использовать с" замена в файлах " для применения по нескольким файлам.

Я вполне уверен, комбинация sed, awk и/или grep сделала бы задание. Они свободны и идут с любым дистрибутивом Linux, но версии Windows существуют также.

#see docs at the bottom 
use strict;
use warnings;
use Cwd;

use File::Find;

my $search_patternFilePath=$ARGV[0] ;
my $replace_patternFilePath =$ARGV[1];
my $file_pattern = $ARGV[2];

# Usage

(@ARGV == 3 ) || die ("Usage: FindAndReplace.pl pathToFileContaingTheMultiLineSearchText FullPathToFileContainingMultiLineReplaceText FilePattern . Example: perl MultiLineFindAndReplace.pl \"D:\Opera\New Folder\search.txt\" \"D:\Opera\replace.txt\" bak");



find(\&d, cwd);

sub d {
my $file = $File::Find::name;
$file =~ s,/,\\,g;

return unless -f $file;
return unless $file =~ /$file_pattern/;

my $searchPatternString = &slurpFile ( $search_patternFilePath ) ; 
my $replacePatternString = &slurpFile ( $replace_patternFilePath ) ; 
my $fileStr = &slurpFile ( $file ) ; 

$fileStr =~ s/$searchPatternString/$replacePatternString/igo ; 
open(FILEHANDLE,">$file") || die "cannot open output file";
print (FILEHANDLE "$fileStr");
close FILEHANDLE ;

}

sub slurpFile 
{
my $file = shift ;
print "\$file is $file" ;
local( $/, *FILE ) ; 
open (FILE , $file) or 
die "Cannot find $file !!! " ; 
my $fileString = <FILE>; #slurp the whole file into one string !!! 
close FILE ;
return $fileString ;
}
#Purpose : performs recursive find and replace based on pеrl regexes from the current directory
#the search and replace is case insensitive
#Usage
#perl MultiLineFindAndReplace.pl "D:\Opera\New Folder\search.txt" "D:\Opera\replace.txt" bak

Я, всегда озадачивают, когда люди просят инструменты, не говоря, для которой платформы (платформ) им нужны они... В этих случаях я предполагаю, что это, по умолчанию, для Windows...

существует много инструментов поиска/замены, доступных для Windows, более или менее мощного, партия их свободны.
В настоящее время, я использую модуль Поиска/Замены Инструменты FileMenu , удивительно мощный (можно использовать регулярные выражения), идя с партией других положительных героев.
у меня есть также RJL Soft Простая Поисковая Замена (никакой REs), автор TortoiseSVN grepWin, поддерживая regexes и большое число вариантов, и существуют некоторые другие, которых я использовал в прошлом.

пз.: Я забыл. Простая Поисковая Замена не сделает многострочных замен. Никакой FileMenu Инструменты, по-видимому. grepWin может сделать (использующий \r\n, например). Я действительно вспоминаю такие бесплатные инструменты с многострочными полями поиска/замены, но у меня нет их имен под рукой.

Для платформы окон я могу второй Ультраредактирование 32 предложения, данные выше - это - замечательный инструмент, и определенно стоящий денег. Другой затем, что, я думаю, Ваш лучший выбор собирается или быть маленьким сценарием жемчуга или иначе awk/sed, снова, как упомянуто выше.