Again you are coming with other solution than the one I used.
Actually I implemented the same in different ways. But, I took it as a challenge to achieve this code only with the help of perl regular expression's special variables($&,$',$`) and some control statements(like while,for,etc.,..). That is why I'm more particular about this post.
Hope you understood my concern.
Last edited by ashok.g; 02-22-2010 at 01:20 AM.