@arr = split /foo|bar|meh/, $str;