Added PERL reserved words in REST keywords (#58535)

rest-api-spec/keywords.json

@@ -334,5 +334,47 @@
     "where",
     "while",
     "yield"
+  ],
+  "perl": [
+    "__DATA__",
+    "__END__",
+    "__FILE__",
+    "__LINE__",
+    "__PACKAGE__",
+    "and",
+    "cmp",
+    "continue",
+    "CORE",
+    "do",
+    "else",
+    "elsif",
+    "eq",
+    "exp",
+    "for",
+    "foreach",
+    "ge",
+    "gt",
+    "if",
+    "le",
+    "lock",
+    "lt",
+    "m",
+    "ne",
+    "no",
+    "or",
+    "package",
+    "q",
+    "qq",
+    "qr",
+    "qw",
+    "qx",
+    "s",
+    "sub",
+    "tr",
+    "unless",
+    "until",
+    "while",
+    "xor",
+    "y"
   ]
 }