$text =~ s/R/\r\n/g;