#### if($data->nodeName eq 'text'){ if ($data->hasChildNodes()) { my $ch = $data->getChildnodes; } }