I'm sorry, I didn't clarify. I would like to do the sort via an array or a hash. I'm trying to learn how to do more things in perl for better understanding.

Thanks again,
Louis