&, |, +, - and * can't be a division.
Fixes: debbugs:17317
+2014-04-23 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * progmodes/perl-mode.el (perl-syntax-propertize-function): Slash after
+ &, |, +, - and * can't be a division (bug#17317).
+
2014-04-22 Stefan Monnier <monnier@iro.umontreal.ca>
* term/xterm.el (xterm--version-handler): Don't use modern xterm
((concat "\\(?:\\(?:^\\|[^$@&%[:word:]]\\)"
(regexp-opt '("split" "if" "unless" "until" "while" "split"
"grep" "map" "not" "or" "and" "for" "foreach"))
- "\\|[?:.,;=!~({[]\\|\\(^\\)\\)[ \t\n]*\\(/\\)")
+ "\\|[-?:.,;|&+*=!~({[]\\|\\(^\\)\\)[ \t\n]*\\(/\\)")
(2 (ignore
(if (and (match-end 1) ; / at BOL.
(save-excursion
#!/usr/bin/perl
# -*- eval: (bug-reference-mode 1) -*-
+if ($c && /====/){xyz;}
+
print <<"EOF1" . s/he"llo/th'ere/;
foo
EOF2