xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx Code I have written use strict; use warnings; use diagnostics; use XML::LibXML; my $dom = XML::LibXML->load_xml(location => $ARGV[0]); my $root = $dom->getDocumentElement; my @records = $root->findnodes("//createnew"); print @records; foreach my $y (@records) { my $x = $y->childNodes; print "$x"; print "Yes\n"; } Output xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx xxx,xxx Yes