Может, встречал кто-нибудь максимально быструю реализацию на Perl такой логики:
1) В конструктор объекта или tied-переменной передаётся статичный набор ключей и начальных значений
2) Конструктор создаёт ссылку на анонимный массив, для каждого ключа генерирует функцию по типу use constant: KEY_{NAME}() => $count++, для каждого из индексов $count++ - кладёт по ссылке на анонимный массив соотв. индексу значение
3) Класс предоставляет методы «взять,записать значение по ключу»: внутри этот метод проверяет, есть ли соотв функция KEY_{NAME} - и если есть, вызывает её, получает индексы - и дальше по этому индексу кладёт или берёт значение.
Смысл в том, чтобы с одной стороны избавиться от оверхеда времени хеширования, а с другой стороны - избежать нанисания явного тупого прописывания индексов для работы со списком «ну почти как» с хешем.
Понятно, что кодится такое довольно просто (и можно даже список ключей не делать статическим). Но интересует именно максимально быстрая реализация, иначе овчинка в сравнении с реализованными на Си функциями хеширования - выделки в общем-то не будет стоить :)