#!usr/bin/perl -w
use strict;

#LISTS OF LISTS (array of array)

my @abc =  #abc is an array of references to arrays
( 
    [ qw (q   w  e  r)  ],
    [ qw (1   x  3  r)  ],
    [ qw (qwe rt 434 )  ],
);

foreach my $array_ref (@abc)
{
   print "@$array_ref \t";
   print "third element: \t", $array_ref->[2],"\n";
}

__END__
Prints:
q w e r     third element:  e
1 x 3 r     third element:  3
qwe rt 434  third element:  434