Не совсем. Эта информация должна быть как-то загружена в память. Тем не менее, сериализация хэш-объекта на диск может помочь, поскольку десериализация, вероятно, быстрее, чем ваш код.
Вы можете проверить freeze
или проверить википедию по сериализации для дальнейших подсказок.
Ознакомьтесь с документацией на perl для FreezeThaw
:
use FreezeThaw qw(freeze thaw cmpStr safeFreeze cmpStrHard);
$string = freeze $data1, $data2, $data3;
...
($olddata1, $olddata2, $olddata3) = thaw $string;
if (cmpStr($olddata2,$data2) == 0) {print "OK!"}
Все, что вам нужно сделать сейчас, это сохранить $string
в файле после его анализа, прочитать его и thaw
это!