use strict; use warnings; use XML::Simple; use XML::LibXML; my $XML_FILE = 'sample.xml'; # Dump of the XML file in Perl's Data Structures my $mldata = XMLin($XML_FILE);