#!/usr/bin/perl

while(<>)
{
    s/НАЙТИ/ЗАМЕНИТЬ/g;
    print;
}