Select Code to Download

print $species->next_sibling_text('Observed');

for my $observed ($species->descendants('Observed'))
{
    print $observed->text();
}