http://www.perlmonks.org?node_id=768330


in reply to Array of array

Dear monk,

We cant separate as what you have asked. Since, it has been given in the perldoc for push that, this function is just appending a list to an array.

But, it is possible to push a reference to the array and get back a particular list of elements. like below.,

push @mainarr,\@arr1;

print Dumper @mainarr->[1];

[download]

UPDATE: Similar answer has been given above when I am typing this, sorry for the repetition

Replies are listed 'Best First'.
Re^2: Array of array
by wfsp (Abbot) on Jun 04, 2009 at 13:00 UTC
    ...sorry for the repetition.
    There's no need to be sorry. I like to see a few versions of a solution. I often pick up handy techniques comparing different approaches.

    A minor nit though, your snippet won't compile throws a warning under strict and warnings. This is a bit better. 

    #!/usr/bin/perl

use warnings;
use strict;
use Data::Dumper;

my @arr1 = qw{one two three};
my @arr2 = qw{four five six};
my @mainarr;
push @mainarr, \@arr1, \@arr2;

#print Dumper @mainarr->[1]; # <- line 12

#Using an array as a reference is deprecated at C:\perm\monk.pl line 1
+2.
#C:\perm\monk.pl syntax OK

print Dumper $mainarr[1];

__DATA__
$VAR1 = [
  'four',
  'five',
  'six'
];

    [download]

    My motto: "Test it _before_ you post it." :-)

    update: it does compile ("syntax OK") but it throws a warning

[reply]
[d/l]

In Section Seekers of Perl Wisdom