s/(?=fox(?!.*fox.*forest).*forest)/the /;

##</code><code>##

s/(?=fox(?:(?!fox).)*forest)/the /;