##
use XML::Smart;
open(my $fh, "<", "test.xml") or die $!;
my $logString;
while (<$fh>)
{
$logString .= $_;
}
my $test = XML::Smart->new($logString);
$test->{log}->{logentry}[0]->{msg}->set_binary('FALSE');
print $test->data();
####
someAuthor
2017-10-11T09:32:15.704935Z
VGhpcyBpcyBteSBTVk4gbWVzc2FnZSB3aXRoIGNoYXJhY3RlcnMgbGlrZSDkIG9yICYu
####
This is my SVN message with characters like ä or &.