[perl #121404] tied hashes are different