if ($string =~ /(new|old|number|start|simple|cross|heavy|die|exit)/i)