perl -ne 's/napre/Text1/gi; print if /\bText1/i || /\bjupiter/i;' GPPRegistry.temp.reg

##</code><code>##

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