@answertext = ("big","huge","large"); $regexpans = join('|',@answertext); $regexpans = '/^('.$regexpans.')\b/';