my (%trec) = &hash_array(@arr);