Help for this page
<FIXML r="20030618" s="20040109" v="4.4" xr="FIA" xv="1"> <Batch> <MktDataFull RptID="13793742" BizDt="2011-12-23"> ... </MktDataFull> </Batch> </FIXML>
my $reader = new XML::LibXML::Reader(location => "$XMLfile") or die "c +annot read $XMLfile\n"; while ( $reader->nextElement( 'MktDataFull' )) { ... } $reader->nextSibling() > 0 or last; }