Select Code to Download

$nl = "\n";   # newline
$nl = '\n';   # backslash n
$nl = qq(\n); # newline
$nl = q(\n);  # backslash n

for (@input) {
  s/\\n/\n/g; # replace \n with newline
  s/\\t/\t/g; # replace \t with tab
}