perl -MXML::LibXML -le'print XML::LibXML->new->parse_string(qq{<root attr="a\nb"/>})->serialize'
<?xml version="1.0"?>
<root attr="a b"/>