update elements and fix some bugs

lib/src/prism/tests/languages/perl/variable_feature.test

Index: lib/src/prism/tests/languages/perl/variable_feature.test
diff --git a/lib/src/prism/tests/languages/perl/variable_feature.test b/lib/src/prism/tests/languages/perl/variable_feature.test
new file mode 100644
index 0000000000000000000000000000000000000000..aad023c485a0b4ebe22493f503d43f3800d20df7
--- /dev/null
+++ b/lib/src/prism/tests/languages/perl/variable_feature.test
@@ -0,0 +1,47 @@
+$foo
+$#foo
+
+${^POSTMATCH}
+
+$^V
+
+@1
+$42
+
+$$
+$_
+%!
+
+%'foo
+$foo'bar
+
+$::::'foo
+$foo::'bar
+
+----------------------------------------------------
+
+[
+	["variable", "$foo"],
+	["variable", "$#foo"],
+
+	["variable", "${^POSTMATCH}"],
+
+	["variable", "$^V"],
+
+	["variable", "@1"],
+	["variable", "$42"],
+
+	["variable", "$$"],
+	["variable", "$_"],
+	["variable", "%!"],
+
+	["variable", "%'foo"],
+	["variable", "$foo'bar"],
+
+	["variable", "$::::'foo"],
+	["variable", "$foo::'bar"]
+]
+
+----------------------------------------------------
+
+Checks for variables.