Sorry if i argued. Actually i did clicked the download but which takes me to plain text page where i can copy the code.

This is how i have done.. It doesnt work in my windows perl but now i tested in ubuntu perl. its working. The output is exactly as i m expected.

I think there may be some problem with version. Thanks for the replies..