how to parse this xml file

From: Franklin (zhgzhang_at_gmail.com)
Date: 10/28/04 

Date: Wed, 27 Oct 2004 21:42:36 -0400
To: beginners@perl.org

Hey!
How can i parse this xmlfile?
As you can see, there are two <DbName>...</DbName> in both
<ResultItemOne> and <ResultItemTwo>. The first two <DbName> values and
last two <DbName> values must be treated different and be given two
different array. You guys have mentioned to use the method such as
print $ref->{'ResultItem'}[0]{'DbName'}. How can I use it in this kind
of scenario?

<ResultItemOne>
                  <DbName>geo</DbName>
                  <DbName>ceo</DbName>
                  <MenuName>GEO Profiles</MenuName>
                  <Count>69408</Count>
                  <Status>Ok</Status>
             </ResultItemOne>

             <ResultItemTwo>
                  <DbName>gds</DbName>
                  <DbName>cds</DbName>
                  <MenuName>GEO DataSets</MenuName>
                  <Count>8</Count>
                  <Status>Ok</Status>
             </ResultItemTwo>

Thank you very much!