Select Code to Download

<table>
<Entry No="1">
...
</description_>
  </Entry>
</table>

my $file = 'xml.xml';
    my $parser = XML::LibXML->new();
...
        }
                   $i++;
    }