perl -ne 'next if !(/\bnapre/i || /\bjupiter/i); s/napre/Text1/gi; print' GPPRegistry.temp.reg