# global %HoHoH
tie %{$HoHoH{text}}, 'Tie::IxHash';

# lexical $HoHoH (reference)
my $HoHoH = {};