$yaml =~ s/(?<=\n)Fred(?=:)/FRED/g;