in reply to replacing text in multiple files

See Iterator::Files

In Section Seekers of Perl Wisdom