use strict;
use warnings;

while (<>) {
    chomp;
    if (/^M$/) {
        print "$_\n";
    } else {
        print "$_\\n";
    }
}