Wiem, że tego rodzaju pytania były już zadawane już wiele razy. Powodem, dla którego tu przyszedłem, jest to, że czuję, że przegapiłem coś prostego i podstawowego.

Czy jest możliwe, aby ten rodzaj rutynowego wyszukiwania był lepszy. Na przykład bez dwukrotnego otwarcia tego samego pliku. Również porady dotyczące prędkości są mile widziane.

Zauważ, że działa to z dopasowaniami wielowierszowymi i zastępuje również łańcuchy wielowierszowe.

<code>#!/bin/perl -w -0777

local $/ = undef;

open INFILE, $full_file_path or die "Could not open file. $!";
$string =  <INFILE>;
close INFILE;

$string =~ s/START.*STOP/$replace_string/sm;

open OUTFILE, ">", $full_file_path or die "Could not open file. $!";
print OUTFILE ($string);
close OUTFILE;
</code>