diff --git a/mode/perl.py b/mode/perl.py
index e27d537..02457bc 100644
--- a/mode/perl.py
+++ b/mode/perl.py
@@ -143,7 +143,7 @@ class PerlGrammar(Grammar):
                    MatchGrammar6, r'\>[a-z]*'),
 
         # match regexes
-        RegionRule('perl.match', r'(?:(?<==~)|(?<=!~)|(?<=\()|(?<=split)|(?<=if)|(?<=unless)|(?<=while)|(?<=until)) *(?P<delim>/)', MatchGrammar1, '/[a-z]*'),
+        RegionRule('perl.match', r'(?:(?<==~)|(?<=!~)|(?<=\()|(?<=split)|(?<=if)|(?<=unless)|(?<=while)|(?<=until)|(?<=\|\|)) *(?P<delim>/)', MatchGrammar1, '/[a-z]*'),
         RegionRule('perl.match', 'm *(?P<delim>/)', MatchGrammar1, '/[a-z]*'),
         RegionRule('perl.match', 'm *(?P<delim>[^ #a-zA-Z0-9_])',
                    StringGrammar, '%(delim)s[a-z]*'),