Свяжите:: HashHistory, может проследить историю всех изменений к связанному мусору.

РЕЗЮМЕ

мой $hh = связь %hash => Связь:: HashHistory, ПАКЕТ, ARGS...;

@values = $hh-> история (КЛАВИША);

Свяжите:: HashHistory, вставляет себя между Вашей программой и другим связанным мусором. Установка и хранение к мусору выглядят полностью нормальными, но Связь:: HashHistory ведет учет всех изменений на каждую клавишу, и может Связать:: HashHistory, даст Вам список всех значений, которые клавиша когда-либо имела, в хронологическом порядке.

Параметры к требованию связи должны быть Связью:: HashHistory, и затем параметры, которые Вы дали бы связи, чтобы связать мусор без особенности истории. Например, предположите, что Вы хотели хранить свои данные мусора в файле NDBM, названном базой данных. Обычно, Вы сказали бы:

связь %hash => NDBM_File, база данных, $flags, $mode;

чтобы получить эту особенность истории, только добавьте Связь:: HashHistory перед NDBM_File:

мой $hh = связь %hash => Связь:: HashHistory,
NDBM_File, база данных, $flags, $mode;

Данные будут все еще храниться в базе данных, и это все еще будет файл NDBM. Вся установка и хранение будут выглядеть одинаково, но история изменения каждой клавиши будет доступна.
Требование связи возвратит объект; чтобы узнать историю клавиши, используйте метод истории на этом объекте. Требуется один параметр, который является ключевой строкой. Это возвратит список всех значений, которые когда-либо связывались с клавишей, в хронологическом порядке, начинающемся с нового. Например:

$hash = сначала;
$hash {b} = секунда;
$hash = треть; # Наложения записей старое значение

# Печать "третья секунда", поскольку Вы ожидали бы
печатайте "$hash $hash {b} n";

@values = $hh-> история (a);
# @values теперь содержит (треть, сначала)

@values = $hh-> история (b);
# @values теперь содержит (секунда)

В настоящее время, если названо в скалярном контексте, история () метод возвратит число элементов в истории. Это поведение может измениться в будущих версиях.

Основной мусор может быть любым связанным классом мусора вообще. Чтобы использовать регулярный мусор в памяти, используйте Связь:: StdHash (распределенный с Perl) как основное выполнение:

используйте Связь:: Мусор; # *NOT Связь:: StdHash*
мой $hh = связь %hash => Связь:: HashHistory, Связь:: StdHash;

Это не столь же эффективно, как это могло быть, потому что усилия и магазины на %hash все еще проходят два уровня связывания. Я могу установить это в будущем выпуске.