Help for this page
s/\\n/\n/g;
s/\\/\\s/g; s/\n/\\n/g; s/\r/\\r/g;
s/\\n/\n/g; s/\\r/\r/g; s/\\s/\\/g;
my %xlat = ('\\' => "\\", 'n' => "\n", 'r' => "\r"); s/\G(?:\\(.)|(.))/defined($1) ? $xlat{$1} : $2/eg;