Yeah, here is an easy solution, run it right at the command line... (Make a backup of the files first!!)
perl -pi -e 's|satellite|target|' *.cpp *.hpp *.asc perl -pi -e 's|Satellite|Target|' *.cpp *.hpp *.asc perl -pi -e 's|SATELLITE|TARGET|' *.cpp *.hpp *.asc Rob -----Original Message----- From: Booher Timothy B 1stLt AFRL/MNAC [mailto:[EMAIL PROTECTED]] Sent: Friday, February 01, 2002 10:22 AM To: [EMAIL PROTECTED] Subject: change all files in directory Hello, I am trying to change all files in a directory that contain the strings Satellite satellite and SATELLITE that I need to change to target, Target and TARGET. Because many of these are C++ source files I need to preserve the case. I was thinking of the following script: #!/usr/bin/perl -w #UNTESTED @FilesInDirectory = <*.cpp *.hpp *.asc>; foreach $FileName (@FilesInDirectory) { open(IN, $FileName); while<IN> { $_ =~ s/satellite/target/; $_ =~ s/Satellite/Target/; $_ =~ s/SATELLITE/TARGET/;} } but this just doesn't seem as efficient as it can be. I was trying to think of regex that could do it all in one line but it seemed so much simpler to do it in three. Any thoughts, Tim -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
