open(FILE,"<$file") || die $!;
my $data;
{ local $/; $data = <FILE> }
close(FILE);