use File::Slurp;
my $raw = slurp($filename);