open (my $handle, '<', $file) or die "Can't read '$file': $!";
my $contents = do { local $/; <$file> };