Multi-dimensional Array In Perl

Perl don’t have multi-dimensional arrays. Instead what we have is the arrays of array reference of another arrays.
Eg :-

#!/usr/bin/perl
my @a;
$a[0][0]='a';
$a[0][1]='b';
$a[1][0]='c';
$a[1][1]='d';
#so you can call values at array @a as follows
print " Type 1 \n ----------- \n";
print $a[0][0]."\n".$a[0][1]."\n".$a[1][0]."\n".$a[1][1]."\n";
print "\n Type 2 \n ----------- \n";
print $a[0]->[0]."\n".$a[0]->[1]."\n".$a[1]->[0]."\n".$a[1]->[1];