|
Lines 236-241
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]/+ end=+/[cgimosx]*
Link Here
|
| 236 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]#+ end=+#[cgimosx]*+ contains=@perlInterpMatch |
236 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]#+ end=+#[cgimosx]*+ contains=@perlInterpMatch |
| 237 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]{+ end=+}[cgimosx]*+ contains=@perlInterpMatch |
237 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]{+ end=+}[cgimosx]*+ contains=@perlInterpMatch |
| 238 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]\[+ end=+\][cgimosx]*+ contains=@perlInterpMatch |
238 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]\[+ end=+\][cgimosx]*+ contains=@perlInterpMatch |
|
|
239 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]|+ end=+|[cgimosx]*+ contains=@perlInterpMatch |
| 240 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!],+ end=+,[cgimosx]*+ contains=@perlInterpMatch |
| 239 |
|
241 |
|
| 240 |
" A special case for m!!x which allows for comments and extra whitespace in the pattern |
242 |
" A special case for m!!x which allows for comments and extra whitespace in the pattern |
| 241 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]!+ end=+![cgimosx]*+ contains=@perlInterpSlash,perlComment |
243 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+[m!]!+ end=+![cgimosx]*+ contains=@perlInterpSlash,perlComment |
|
Lines 251-256
syn region perlMatch matchgroup=perlMatchStartEnd start=+^split /+lc=5 start=+[^
Link Here
|
| 251 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s'+ end=+'+me=e-1 contains=@perlInterpSQ nextgroup=perlSubstitutionSQ |
253 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s'+ end=+'+me=e-1 contains=@perlInterpSQ nextgroup=perlSubstitutionSQ |
| 252 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s"+ end=+"+me=e-1 contains=@perlInterpMatch nextgroup=perlSubstitutionDQ |
254 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s"+ end=+"+me=e-1 contains=@perlInterpMatch nextgroup=perlSubstitutionDQ |
| 253 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s/+ end=+/+me=e-1 contains=@perlInterpSlash nextgroup=perlSubstitutionSlash |
255 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s/+ end=+/+me=e-1 contains=@perlInterpSlash nextgroup=perlSubstitutionSlash |
|
|
256 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s|+ end=+|+me=e-1 contains=@perlInterpMatch nextgroup=perlSubstitutionPalka |
| 257 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s,+ end=+,+me=e-1 contains=@perlInterpMatch nextgroup=perlSubstitutionComma |
| 254 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s#+ end=+#+me=e-1 contains=@perlInterpMatch nextgroup=perlSubstitutionHash |
258 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s#+ end=+#+me=e-1 contains=@perlInterpMatch nextgroup=perlSubstitutionHash |
| 255 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s\[+ end=+\]+ contains=@perlInterpMatch nextgroup=perlSubstitutionBracket skipwhite skipempty skipnl |
259 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s\[+ end=+\]+ contains=@perlInterpMatch nextgroup=perlSubstitutionBracket skipwhite skipempty skipnl |
| 256 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s{+ end=+}+ contains=@perlInterpMatch nextgroup=perlSubstitutionCurly skipwhite skipempty skipnl |
260 |
syn region perlMatch matchgroup=perlMatchStartEnd start=+\<s{+ end=+}+ contains=@perlInterpMatch nextgroup=perlSubstitutionCurly skipwhite skipempty skipnl |
|
Lines 258-263
syn region perlSubstitutionSQ matchgroup=perlMatchStartEnd start=+'+ end=+'[ec
Link Here
|
| 258 |
syn region perlSubstitutionDQ matchgroup=perlMatchStartEnd start=+"+ end=+"[ecgimosx]*+ contained contains=@perlInterpDQ |
262 |
syn region perlSubstitutionDQ matchgroup=perlMatchStartEnd start=+"+ end=+"[ecgimosx]*+ contained contains=@perlInterpDQ |
| 259 |
syn region perlSubstitutionSlash matchgroup=perlMatchStartEnd start=+/+ end=+/[ecgimosx]*+ contained contains=@perlInterpDQ |
263 |
syn region perlSubstitutionSlash matchgroup=perlMatchStartEnd start=+/+ end=+/[ecgimosx]*+ contained contains=@perlInterpDQ |
| 260 |
syn region perlSubstitutionHash matchgroup=perlMatchStartEnd start=+#+ end=+#[ecgimosx]*+ contained contains=@perlInterpDQ |
264 |
syn region perlSubstitutionHash matchgroup=perlMatchStartEnd start=+#+ end=+#[ecgimosx]*+ contained contains=@perlInterpDQ |
|
|
265 |
syn region perlSubstitutionPalka matchgroup=perlMatchStartEnd start=+|+ end=+|[ecgimosx]*+ contained contains=@perlInterpDQ |
| 266 |
syn region perlSubstitutionComma matchgroup=perlMatchStartEnd start=+,+ end=+,[ecgimosx]*+ contained contains=@perlInterpDQ |
| 261 |
syn region perlSubstitutionBracket matchgroup=perlMatchStartEnd start=+\[+ end=+\][ecgimosx]*+ contained contains=@perlInterpDQ |
267 |
syn region perlSubstitutionBracket matchgroup=perlMatchStartEnd start=+\[+ end=+\][ecgimosx]*+ contained contains=@perlInterpDQ |
| 262 |
syn region perlSubstitutionCurly matchgroup=perlMatchStartEnd start=+{+ end=+}[ecgimosx]*+ contained contains=@perlInterpDQ |
268 |
syn region perlSubstitutionCurly matchgroup=perlMatchStartEnd start=+{+ end=+}[ecgimosx]*+ contained contains=@perlInterpDQ |
| 263 |
|
269 |
|
|
Lines 473-478
if version >= 508 || !exists("did_perl_syn_inits")
Link Here
|
| 473 |
HiLink perlSubstitutionDQ perlString |
479 |
HiLink perlSubstitutionDQ perlString |
| 474 |
HiLink perlSubstitutionSlash perlString |
480 |
HiLink perlSubstitutionSlash perlString |
| 475 |
HiLink perlSubstitutionHash perlString |
481 |
HiLink perlSubstitutionHash perlString |
|
|
482 |
HiLink perlSubstitutionPalka perlString |
| 483 |
HiLink perlSubstitutionComma perlString |
| 476 |
HiLink perlSubstitutionBracket perlString |
484 |
HiLink perlSubstitutionBracket perlString |
| 477 |
HiLink perlSubstitutionCurly perlString |
485 |
HiLink perlSubstitutionCurly perlString |
| 478 |
HiLink perlSubstitutionPling perlString |
486 |
HiLink perlSubstitutionPling perlString |
| 479 |
- |
|
|
