my $xml = do {
        local $/ = undef;
        open (my $fh, "<:raw", $file) or die "Failed to open $file - $!";
        <$fh>;
    };