Select Code to Download

use strict;
use warnings;
...
print $str . "\"\n";

"Joe said   hello" --> "Joe said   hello"