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

Reply via email to