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