... open my $fh,'<',$file or die $!; my $content = do { local $/; <$fh>; }; close $fh; ...