#!/usr/bin/perl 
use strict;
use warnings;
use Data::Dumper;

my @array = (['element-1','element-2'],'element-3');
my ($row,$column);

print "\n" . Dumper(\@array) . "\n";

print $array[0][0] . "\n";
print $array[0][1] . "\n";
print $array[1] . "\n" . "\n";

foreach $row (@array) {
    foreach $column (@$row) {
	print "This is the \$column: ".$column."\n";
    }
}

__END__

$VAR1 = [
          [
            'element-1',
            'element-2'
          ],
          'element-3'
        ];

element-1
element-2
element-3

This is the $column: element-1
This is the $column: element-2
Can't use string ("element-3") as an ARRAY ref while "strict refs" in use at arraysarray.pl line 15.