print REPORT '<td>'
          . $e->{desc}->{descript}->{content}
          . '</td><td><br>';


##</code><code>##

<entry type="CVE" severity="Medium" seq="1999-0453" published="1999-01-01" name="CVE-1999-0453" modified="2008-09-05" CVSS_version="2.0" CVSS_vector="(AV:N/AC:L/Au:N/C:P/I:N/A:N)" CVSS_score="5.0" CVSS_impact_subscore="2.9" CVSS_exploit_subscore="10.0" CVSS_base_score="5.0">
    <desc>
      <descript source="cve">An attacker can identify a CISCO device by sending a SYN packet to port 1999, which is for the Cisco Discovery Protocol (CDP).</descript>
      <descript source="nvd">Please see the following link for more information:http://seclists.org/bugtraq/1999/Jan/0215.html</descript>
    </desc>

##</code><code>##

$data = $xml->XMLin(
    $ARGV[0],
    KeyAttr    => { cve    => 'entry'},
   ForceArray => [ 'cve', 'ref' ]

);