Select Code to Download

#!/usr/bin/perl

...
$buffer =~ s/\n/\\n/g;
warn "test_global buffer:\n($buffer)\n";
print "\n";

===============dry run============
    printing [perl_output_newline]
...
test_global buffer:
(***perl_output_newline\n***perl_output)

===============dry run============
    printing [perl_output_newline]
...
(***perl_output_newline\n***perl_output)

###c_output