http://qs321.pair.com?node_id=1227476


in reply to Re^4: Strip XML document
in thread Strip XML document

try

# ($props{$lang} = $tuv->findvalue('seg')) =~ s{\n}{<lb/>}g; my $seg = $tuv->findnodes('seg')->get_node(1); #first $props{$lang} = join '',map {$_->toString} $seg->childNodes(); $props{$lang} =~ s{\n}{<lb/>}g;
poj