in reply to replaceing text in file using replace prattern
Hai, Try this simple
undef $/; open(IN, "D:\\temp.log"); $str = <IN>; print $str; close(IN); $str =~ s#<b>#*<b>#gsi; $str =~ s#</b>#</b>*#gsi; open(OUT, "> D:\\temp.log"); print OUT $str; close(OUT);
|
|---|