open INFILE, "OFADmMsg.mc"; while () { $_ =~ s/Domain Migration Agent/OFA Data Gathering Agent/g; $_ =~ s/Active Directory Migration Tool/OFA Data Gathering Tool/g; print OUTFILE; }