my $file = './foo.file';
local $/;     
open my $OF, $file or die $!;
my $filecontent = <$OF>;
close $OF or die $!;