Re: Re^2: Large scale search and replace with perl -i

find . -name "*.html" -type f -print0 | perl -i -p0e \
 'BEGIN{ @ARGV = <STDIN>; chomp @ARGV; $/ = \65536 }; \
  while (<>) { s/foo/bar/g; print }'
[download]

You don't want to do that. If 'foo' spans across one of those read blocks, then you'll miss the substitution.

Comment on Re: Re^2: Large scale search and replace with perl -i Download Code

Replies are listed 'Best First'.
Re^4: Large scale search and replace with perl -i (doh!) by Aristotle (Chancellor) on Apr 14, 2003 at 21:07 UTC
Duh.. I can't believe I didn't think of that. Makeshifts last the longest.	[reply]


Pathologically Eclectic Rubbish Lister
	PerlMonks