if $text=~m/\b(director|resignation)\b/ 
# code that shows which word matched;