perl -MData::Dumper -E "print Dumper qq<a\rb>"
b';R1 = 'a