summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/test
diff options
context:
space:
mode:
Diffstat (limited to 'perl_checker.src/test')
-rw-r--r--perl_checker.src/test/context.t4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl_checker.src/test/context.t b/perl_checker.src/test/context.t
index 637360e..081abcc 100644
--- a/perl_checker.src/test/context.t
+++ b/perl_checker.src/test/context.t
@@ -35,3 +35,7 @@ qw(a b) > 2 context tuple(string, string) is not co
you should use a number operator, not the string operator "eq" (or replace the number with a string)
@l == ()
+
+$xxx = { xxx() }->{xxx};
+
+$xxx = { xxx() }->{$xxx};