diff options
| -rw-r--r-- | server/perl.tmLanguage.json | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/server/perl.tmLanguage.json b/server/perl.tmLanguage.json index d0094db..9230a11 100644 --- a/server/perl.tmLanguage.json +++ b/server/perl.tmLanguage.json @@ -814,16 +814,22 @@ ] }, { - "begin": "(?<=\\(|=|!|\\{|~|&|\\||\\bif|\\bunless|\\band|\\bor|\\bsplit|\\bgrep|^)\\s*((\\/))(?!\\/=)", + "begin": "(?<=\\(|=|!|\\{|~|&|\\||\\bif|\\bunless|\\band|\\bor|\\bsplit|\\bgrep)\\s*((\\/))(?!\\/=)|(?<=^)\\s*((\\/))(?!\\/)", "beginCaptures": { "1": { "name": "string.regexp.find.perl" }, "2": { "name": "punctuation.definition.string.perl" + }, + "3": { + "name": "string.regexp.find.perl" + }, + "4": { + "name": "punctuation.definition.string.perl" } }, - "end": "((\\1([egimosxradlupcn]*)))(?=(\\s+\\S|\\s*[;\\,\\#\\{\\}\\)\\.]|\\s*$))", + "end": "((\\/([egimosxradlupcn]*)))(?=(\\s+\\S|\\s*[;\\,\\#\\{\\}\\)\\.]|\\s*$))", "endCaptures": { "1": { "name": "string.regexp.find.perl" |