You might try using a hash with the Tie::IxHash module, which will allow you to retrive the values of your hash in the original insertoin order. This way you dedup and keep the sorting with a single effort.

webadept.net