summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/test/context.t
diff options
context:
space:
mode:
Diffstat (limited to 'perl_checker.src/test/context.t')
-rw-r--r--perl_checker.src/test/context.t18
1 files changed, 17 insertions, 1 deletions
diff --git a/perl_checker.src/test/context.t b/perl_checker.src/test/context.t
index c0bc221..637360e 100644
--- a/perl_checker.src/test/context.t
+++ b/perl_checker.src/test/context.t
@@ -13,9 +13,25 @@ length @l never use "length @l", it returns the l
'xxx' > 'yyy' context string is not compatible with context float
context string is not compatible with context float
- you should use a string operator, not the number operator ">"
+
1 cmp 2 you should use a number operator, not the string operator "cmp" (or replace the number with a string)
$xxx == undef context undef is not compatible with context float
+my ($xxx) = 1 context int is not compatible with context tuple(scalar)
+
+($xxx, $yyy) = 1 context int is not compatible with context tuple(scalar, scalar)
+
+($xxx, $yyy) = (1, 2, 3) context tuple(int, int, int) is not compatible with context tuple(scalar, scalar)
+
+@l eq '3' context array is not compatible with context string
+
+qw(a b) > 2 context tuple(string, string) is not compatible with context float
+
+%h > 0 context hash is not compatible with context float
+
+%h eq 0 context hash is not compatible with context string
+ you should use a number operator, not the string operator "eq" (or replace the number with a string)
+
+@l == ()