perl -0 -pe's/(n...){4}ko/$&
KI-YO-SHI!/gs'