how to remove ^M character from every line

[divya]

Hi ,

A file generated on Windows machine is used on linux m/c while scripting.
A sample line from the file is as shown:
//-------------------------------------------------------^M
File name : project_name^M
.....

Now in the perl script how can I remove ^M without running the command 
dos2unix.

Note: Trying to split the line whenever ^ detected is not working.

Looking forward for your response.

Thanks,
Divya