Thanks! This version make the ourput in perfect way!

I will try to make comment/requirement more specific while making an question

Thanks for your effort! I need to learn more about indexing and hash in perl. This post will be a good starting point.

Amit