diff options
| author | brian d foy <brian.d.foy@gmail.com> | 2008-06-08 00:59:22 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-06-08 14:45:20 +0000 |
| commit | d6db67f2d91e588a13d4c1b90d1af1054faf4d41 (patch) | |
| tree | e01b81304c2d804ab5c060e8625b93f5a027b38f /pod | |
| parent | 055cc54b4128c67aa77e57733051a6c9e7cc10f9 (diff) | |
| download | perl-d6db67f2d91e588a13d4c1b90d1af1054faf4d41.tar.gz | |
perlsyn: equivalent code for HASH ~~ ARRAY
Message-ID: <070620082359221579%brian.d.foy@gmail.com>
p4raw-id: //depot/perl@34027
Diffstat (limited to '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 44c4f1aff3..ec865103c5 100644 --- a/pod/perlsyn.pod +++ b/pod/perlsyn.pod @@ -674,7 +674,7 @@ order, determines the match behaviour. Any Code[+] scalar sub truth $b->($a) Hash Hash hash keys identical [sort keys %$a]~~[sort keys %$b] - Hash Array hash slice existence grep {exists $a->{$_}} @$b + Hash Array hash slice existence @$b == grep {exists $a->{$_}} @$b Hash Regex hash key grep grep /$b/, keys %$a Hash Any hash entry existence exists $a->{$b} |