Tie::Array::AsHash uses some practical extracting code so arrays can be tied to hashes.