diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-03-23 15:45:55 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-03-23 15:46:08 +0100 |
commit | 2a37c5e7310aa2e0852ae3dcc39c0d69b41babe6 (patch) | |
tree | 43df81c01f2fed0e88120a9d5c88ba99aebc7827 /pod/perlsyn.pod | |
parent | 61a621c635b84b53e4eb7d27f7e28c7cd3bdf7e6 (diff) | |
download | perl-2a37c5e7310aa2e0852ae3dcc39c0d69b41babe6.tar.gz |
Add more tests with an empty hash on the right of ~~
Diffstat (limited to 'pod/perlsyn.pod')
-rw-r--r-- | pod/perlsyn.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlsyn.pod b/pod/perlsyn.pod index 52a3f87c24..157b02b7e2 100644 --- a/pod/perlsyn.pod +++ b/pod/perlsyn.pod @@ -688,7 +688,7 @@ entries apply in those cases. Any CodeRef scalar sub truth $b->($a) Hash Hash hash keys identical [sort keys %$a]~~[sort keys %$b] - Array Hash hash slice existence @$a == grep {exists $b->{$_}} @$a + Array Hash hash slice existence[1] @$a == grep {exists $b->{$_}} @$a Regex Hash hash key grep[1] grep /$a/, keys %$b undef Hash always false (undef can't be a key) Any Hash hash entry existence exists $b->{$a} |