use Tie::IxHash;
tie %hashname, "Tie::IxHash";