use 5.010;
use XML::Simple;
use Data::Dumper;

my $ref = XMLin(join('', <DATA>));
print Dumper($ref);

foreach my $i (0 .. $#{$ref->{'desc'}{'descript'}}) {
    say $ref->{'desc'}{'descript'}[$i]{'content'};
}

__DATA__
<entry type="CVE" severity="Medium">
    <desc>
      <descript source="cve">test1</descript>
      <descript source="nvd">test2</descript>
    </desc>
</entry>