diff --git a/Syntaxes/Perl.plist b/Syntaxes/Perl.plist
index c863982..e09c2e1 100644
--- a/Syntaxes/Perl.plist
+++ b/Syntaxes/Perl.plist
@@ -2190,28 +2190,40 @@
comment
- Match empty brackets for ↩ snippet
+ Match empty parenthesis for ↩ snippet
match
- (\{)(\})
+ (\()(\))
- captures
+ comment
+ Match a code block
+ begin
+ \{
+ beginCaptures
- 1
+ 0
name
- punctuation.section.scope.begin.perl
+ punctuation.section.scope.begin.js
- 2
+
+ end
+ \}
+ endCaptures
+
+ 0
name
- punctuation.section.scope.end.perl
+ punctuation.section.scope.end.js
- comment
- Match empty parenthesis for ↩ snippet
- match
- (\()(\))
+ patterns
+
+
+ include
+ $self
+
+
repository