In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/b8db74f2e886c63d3cd1c65e2fde6d09c0b3e436?hp=e8a7a70e88f9938f39cd41afa48caf1f69e66f3a>
- Log ----------------------------------------------------------------- commit b8db74f2e886c63d3cd1c65e2fde6d09c0b3e436 Author: Father Chrysostomos <spr...@cpan.org> Date: Fri Jun 10 09:48:06 2011 -0700 perldata: Link directly to $; M pod/perldata.pod commit 74314d7a4759b44bca39aa59bf8621e39f9dd165 Author: Father Chrysostomos <spr...@cpan.org> Date: Fri Jun 10 09:46:37 2011 -0700 Add another address for Ian Goodacre M Porting/checkAUTHORS.pl commit 9ed2a148ec1ba95f38023eeb18a003bc20d0b45b Author: Ian Goodacre <i...@debian.lan> Date: Fri Jun 10 21:47:38 2011 +1200 Document multi-dimensional array emulation. M pod/perldata.pod ----------------------------------------------------------------------- Summary of changes: Porting/checkAUTHORS.pl | 1 + pod/perldata.pod | 14 ++++++++++++++ 2 files changed, 15 insertions(+), 0 deletions(-) diff --git a/Porting/checkAUTHORS.pl b/Porting/checkAUTHORS.pl index ae094a7..856a9f5 100755 --- a/Porting/checkAUTHORS.pl +++ b/Porting/checkAUTHORS.pl @@ -599,6 +599,7 @@ hansmu\100xs4all.nl hansm\100icgroup.nl hio\100ymir.co.jp hio\100hio.jp hops\100sco.com hops\100scoot.pdev.sco.com +ian.goodacre\100xtra.co.nz ian\100debian.lan ingo_weinhold\100gmx.de bonefish\100cs.tu-berlin.de james\100mastros.biz theorb\100desert-island.me.uk diff --git a/pod/perldata.pod b/pod/perldata.pod index 28e4ecc..f34979c 100644 --- a/pod/perldata.pod +++ b/pod/perldata.pod @@ -697,6 +697,20 @@ You can also subscript a list to get a single element from it: $dir = (getpwnam("daemon"))[7]; +=head2 Multi-dimensional array emulation + +Multidimensional arrays may be emulated by subscripting a hash with a +list. The elements of the list are joined with the subscript separator +(see L<perlvar/$;>). + + $foo{$a,$b,$c} + +is equivalent to + + $foo{join($;, $a, $b, $c)} + +The default subscript separator is "\034", the same as SUBSEP in B<awk>. + =head2 Slices X<slice> X<array, slice> X<hash, slice> -- Perl5 Master Repository