in reply to Quick Regex trouble

Just a note: What should the programme do if a line contains both? E.g.
qwerty neighbor 12345 use neighbor

[download]
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

In Section Seekers of Perl Wisdom