$hash{$key1}{$key2} = $value #### do { my ($key, $val) = retrieve_kv($hash{$k}); } until (ALL 5 KEYS ARE UNIQUE);