use strict;
use warnings;
use XML::LibXML;
my $xmlString = "From mobile, dial this number:";
my $dom = XML::LibXML->load_xml(string => $xmlString);
my $to_literal = $dom->to_literal('/doc/text');
print "to_literal:\t$to_literal\n";
my $findvalue = $dom->findvalue('/doc/text');
print "findvalue:\t$findvalue\n";
my $textContent = $dom->textContent('/doc/text');
print "textContent:\t$textContent\n";
####
to_literal: From mobile, dial this number:
findvalue: From mobile, dial this number:
textContent: From mobile, dial this number: