perl -i.bak -pe 's/^\cJ/\cM\cJ/' your_file_name_here