in reply to RE: Replacing one string within a file with another string
in thread Replacing one string within a file with another string

But don't you wish there was a better way to mix the two? 

perl -i.bak -pMFile::find -e 'BEGIN{find(sub{push@ARGV,$File::find::na
+me if /[.]inf$/i},".")}s/Name/FullName/g'

[download]

just seems like too much work!.

        - tye (but my friends call me "Tye")

Replies are listed 'Best First'.
RE:(3) Replacing one string... (Nice work, tye)
by Russ (Deacon) on Aug 18, 2000 at 03:44 UTC
    Nice use of -M, BEGIN{} and @ARGV.

    Too much work? Perhaps, but nice, anyway!

    Russ
    Brainbench 'Most Valuable Professional' for Perl

[reply]

In Section Seekers of Perl Wisdom