Ответ.

В Perl по умолчанию копирование ссылочных структур (например, массивов массивов или хэшей хэшей) выполняется поверхностно: копируются только сами ссылки, а не вложенные содержимые. Исторически это часто приводило к неожиданным эффектам — изменение внутренней структуры в одной копии отражается в других. Решение: использовать специализированные методы и модули для глубокого клонирования, чтобы создать самостоятельную структуру с независимыми вложенными элементами.

Пример кода (с использованием Storable):

use Storable 'dclone';
my $original = { a => [1, 2, { x => 10 }] };
my $copy = dclone($original);
$copy->{a}[2]{x} = 20;
print $original->{a}[2]{x}; # 10

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

Поверхностное копирование резко отличается от глубокого: требуется специальная функция.
Модуль Storable — стабильное решение для большинства случаев.
Для глубокого копирования нестандартных объектов нужно перегружать методы сериализации.

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

Работает ли оператор “=” ($copy = $ref) для глубокого копирования?

Нет, оператор “=” копирует только саму ссылку. После такого присваивания любые изменения $copy отражаются и в $ref.

Можно ли использовать функцию Data::Dumper для глубокого копирования структуры?

Data::Dumper — инструмент для отладки и сериализации в строку, не предназначен для восстановления структуры данных в памяти. Для обратного преобразования нужен eval, что опасно и не рекоммендуется по причинам безопасности и производительности.

Всегда ли dclone работает корректно с объектами (благословлёнными ссылками)?

Storable::dclone клонирует объекты, но только если класс не перегружает методы сериализации или не содержит нестандартных объектов (например, файловых дескрипторов или сильных ссылок на внешний ресурс). Для сложных объектов требуется реализовать методы STORABLE_freeze и STORABLE_thaw.

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

Использование простого присваивания вместо глубокого копирования.
Применение Data::Dumper + eval для клонирования.
Желание вручную рекурсивно перелопачивать структуру, что приводит к ошибкам и невозможности корректно обработать циклические ссылки.

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

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

Массив массивов дублируется оператором =, в одну из вложенных структур вносятся изменения — во всех копиях видны те же изменения.

Плюсы:

Проще код.

Минусы:

Скрытые баги и неожиданные сайд‑эффекты при масштабировании приложения.

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

Используется Storable::dclone или Clone::PP, все вложенные структуры независимы.