From 20b5cbfa92cac93ab78f3fefeb6169e4ea303189 Mon Sep 17 00:00:00 2001
From: Veesh Goldman <rabbiveesh@gmail.com>
Date: Sun, 22 Sep 2024 21:15:38 +0300
Subject: feat(perl): support more modern syntax

---
 lockfile.json               |  2 +-
 queries/perl/highlights.scm | 15 +++++++++++++++
 2 files changed, 16 insertions(+), 1 deletion(-)

diff --git a/lockfile.json b/lockfile.json
index 16c017718..061b68a5b 100644
--- a/lockfile.json
+++ b/lockfile.json
@@ -519,7 +519,7 @@
     "revision": "217ff2af3f2db15a79ab7e3d21ea1e0c17e71a1a"
   },
   "perl": {
-    "revision": "458e694f63d59edc72a9fb321443f70f740e04e8"
+    "revision": "81c57e274c541c30d6c204c8dbceb90ec647ed8d"
   },
   "php": {
     "revision": "74c6b0d560c2660db4d9e8c76b681f538d494160"
diff --git a/queries/perl/highlights.scm b/queries/perl/highlights.scm
index f654577f6..554743b32 100644
--- a/queries/perl/highlights.scm
+++ b/queries/perl/highlights.scm
@@ -45,6 +45,11 @@
   "method"
 ] @keyword.function
 
+[
+  "async"
+  "await"
+] @keyword.coroutine
+
 [
   "map"
   "grep"
@@ -54,6 +59,7 @@
 [
   "package"
   "class"
+  "role"
 ] @keyword.import
 
 [
@@ -63,6 +69,7 @@
   "my"
   "our"
   "local"
+  "dynamically"
   "state"
   "field"
   "last"
@@ -82,10 +89,16 @@
 (phaser_statement
   phase: _ @keyword)
 
+(class_phaser_statement
+  phase: _ @keyword)
+
 [
   "or"
+  "xor"
   "and"
   "eq"
+  "equ"
+  "eqr"
   "ne"
   "cmp"
   "lt"
@@ -106,6 +119,8 @@
   (version)
 ] @number
 
+(boolean) @boolean
+
 [
   (string_literal)
   (interpolated_string_literal)
-- 
cgit v1.3