     'applyEndPatternLast': 1
     'begin': '\\b(?=qr\\s*[^\\s\\w])'
     'comment': 'string.regexp.compile.perl'
-    'end': '((([egimosxradlu]*)))(?=(\\s+\\S|\\s*[;\\,\\#\\{\\}\\)]|$))'
+    'end': '((([egimosxradlupc]*)))(?=(\\s+\\S|\\s*[;\\,\\#\\{\\}\\)]|$))'
     'endCaptures':
       '1':
         'name': 'string.regexp.compile.perl'

        'captures':
          '0':
            'name': 'punctuation.definition.string.perl'
        'end': '\'(?=[egimosradlu]*x[egimosradlu]*)\\b'
        'name': 'string.regexp.replace.extended.simple_delimiter.perl'
        'patterns': [
          {

        'captures':
          '0':
            'name': 'punctuation.definition.string.perl'
        'end': '\\1(?=[egimosradlupc]*x[egimosradlupc]*)\\b'
        'name': 'string.regexp.replace.extended.simple_delimiter.perl'
        'patterns': [
          {
