на счёт функции не знаю, но даже если функция то она имхо устраивает такой же перебор, а вообще как данные попадают в хэш?

http://opennet.ru/docs/RUS/perl_hash/