Select Code to Download

#!/usr/bin/perl -w
use strict;
...
);

printf("string = $string\n");

#!/bin/tcsh

/home/perl_scripts/pass_newline_as_text.pl \
    -string 'foo\nbar'

string = foo
bar

string = foo\nbar