open(FH, $file) or die $!;
my $content = join('', <FH>);
close(FH);