Select Code to Download

local $/;

local $/ = undef;

$/ = undef;

# print entire file
open FH,'foo.txt';
...
open FH,'bar.txt';
my $bar = <FH>;
print $bar;