use Tie::IxHash;
tie %data, 'Tie::IxHash';