Hello AhmedABdo, and welcome to the Monastery!

Try changing:

print $species->next_sibling_text('Observed');
[download]

to:

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

(Also, please add <code> ... </code> tags around the file data.)

Hope that helps,