feat(perl): support more modern syntax

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)