Ответ.

В Perl нет встроенного синтаксиса для многомерных массивов, как это реализовано в некоторых других языках. Вместо этого используются массивы массивов, где каждый элемент верхнего уровня — это ссылка на другой массив. Такая организация позволяет гибко моделировать таблицы, матрицы и другие структуры данных, требующие двумерности или большей вложенности.

История вопроса

Изначально Perl разрабатывался для обработки текста и работы с простыми структурами, но с появлением ссылок (начиная с Perl 5) у разработчиков появилась возможность строить сложные вложенные структуры — например, массив массивов (array of arrays) или хэш массива.

Проблема

Главная подмена ожидания у новых пользователей: попытка создать двумерный массив простым способом — например, объявить @matrix = ( (1,2), (3,4) ). Такой подход не даст желаемого результата, поскольку элементы будут распакованы как скалярные значения, а не как вложенные структуры. Также часто совершается ошибка при копировании массивов: неглубокое копирование приводит к неожиданным побочным эффектам.

Решение

В Perl многомерные массивы строятся через ссылки на массивы. Правильная инициализация выглядит так:

my @matrix;
for my $i (0..2) {
    for my $j (0..2) {
        $matrix[$i][$j] = $i * $j;
    }
}
# Доступ к элементу: $matrix[1][2]

Или через анонимные ссылки:

my $matrix = [ [1,2,3], [4,5,6], [7,8,9] ];
print $matrix->[1][2]; # 6

Ключевые особенности:

Все вложенные структуры — это ссылки: изменение вложенного массива может повлиять на другие части данных при неправильном копировании
Нет синтаксического сахара для создания и инициализации многомерных массивов; всё делается явно
Для копирования многомерного массива требуется глубокое копирование (deep copy), иначе рискуете получить общие участки памяти

Вопросы с подвохом.

Можно ли создавать многомерные массивы без ссылок, просто объявляя скобки внутри скобок, как в других языках?

Нет. Perl в этом случае разыменовывает элементы как обычный список. Только использование ссылок корректно.

Пример некорректного кода:

my @matrix = ((1,2,3),(4,5,6),(7,8,9)); # Элементы идут в ряд
print $matrix[3]; # 4, а не [4,5,6] — неправильная работа

Корректный способ:

my @matrix = ( [1,2,3], [4,5,6], [7,8,9] );
print $matrix[1][2]; # 6

Что произойдет, если скопировать массив массивов простым присваиванием?

Копируется только верхний уровень, вложенные массивы будут ссылаться на одни и те же области памяти.

Пример:

my @a = ( [1,2], [3,4] );
my @b = @a;
$a[0][0] = 99;
print $b[0][0]; # 99, хотя ожидали 1 — неглубокое копирование!

Можно ли "глубоко" скопировать вложенный массив встроенными силами Perl?

Нет, Perl не предоставляет стандартного оператора глубокой копии для вложенных структур. Нужно использовать модуль Storable или рекурсивную функцию.

Пример с Storable:

use Storable 'dclone';
my $deepcopy = dclone(\@matrix);

Типовые ошибки и анти-паттерны

Попытка скопировать многомерный массив простым присваиванием
Отсутствие глубокого копирования при работе с вложенными структурами
Попытка обращаться к неинициализированным элементам, что приводит к ошибкам (autovivification)
Смешивание скаляров и ссылок в одной структуре

Пример из жизни

Негативный кейс

Разработчик создаёт двумерную матрицу простым объявлением массива и копирует её присваиванием:

my @m1 = ([1,2],[3,4]);
my @m2 = @m1;
$m1[0][0] = 77;
print $m2[0][0];

Плюсы:

Просто и быстро
Легко читается код новичком

Минусы:

Изменяется структура в обоих массивах неожиданно
Потенциальное появление багов в большом проекте

Позитивный кейс

Использование модуля Storable для глубокого копирования:

use Storable 'dclone';
my @m1 = ([1,2],[3,4]);
my $m2 = dclone(\@m1);
$m1[0][0] = 77;
print $m2->[0][0]; # 1

Плюсы:

Корректное раздельное хранение данных
Нет побочных эффектов при модификации копии

Минусы:

Нужно использовать дополнительный модуль
Немного тяжелее по ресурсам