Select Code to Download

    $value =~ s/%0D%0A/|/g;

print <<"END_HERE_DOC";
This
...
be
printed
END_HERE_DOC

use strict;
use Benchmark;
...
            '
    } );
}

Benchmark: timing 5000000 iterations of here docs, print...
 here docs: 21 wallclock secs (19.04 usr +  0.95 sys = 19.99 CPU) @ 25
+0150.09/s (n=5000000)
     print: 44 wallclock secs (40.69 usr +  1.26 sys = 41.95 CPU) @ 11
+9189.51/s (n=5000000)
Benchmark: timing 5000000 iterations of here docs, print...