diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-08-11 02:34:55 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-08-11 02:34:55 +0000 |
commit | 52958e76f2c154b20367a509b0d9919231522563 (patch) | |
tree | 570db8092584b6ec0a991ab10ef1f7fb892654b3 /perl_checker.src/test | |
parent | 65df1801fe6cc17fb0a8c14d3870261df40bade2 (diff) | |
download | perl-MDK-Common-52958e76f2c154b20367a509b0d9919231522563.tar perl-MDK-Common-52958e76f2c154b20367a509b0d9919231522563.tar.gz perl-MDK-Common-52958e76f2c154b20367a509b0d9919231522563.tar.bz2 perl-MDK-Common-52958e76f2c154b20367a509b0d9919231522563.tar.xz perl-MDK-Common-52958e76f2c154b20367a509b0d9919231522563.zip |
partially fix { xxx() }->{$foo}
Diffstat (limited to 'perl_checker.src/test')
-rw-r--r-- | perl_checker.src/test/context.t | 4 |
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}; |