open my $fh, '<', 'mydata.txt' or die $!;
defined( my $data = do { local $/; <$fh> } ) or die $!;
close $fh or die $!;