Actually I am a new to perl and past 3 days I am trying to work it out.
Any help will greatly be appreciated...