I do such jobs by this way (I did not really understood, what do you expect on output, so consider it as example...):

#!/usr/bin/perl

use XML::Trivial;

my $xml = XML::Trivial::parse('<inventory>
  <item1>
    <itemName>jeans501</itemName>
    <itemId>j501ab</itemId>
    <countryOrgin>mexico</countryOrgin>
  </item1>
  <item2>
    <itemName>jeans502</itemName>
    <itemId>j502ab</itemId>
    <countryOrgin>mexico</countryOrgin>
  </item2>
</inventory>');

foreach ($xml->{inventory}->ea) {
    print $_->en. "\n";
    foreach ($_->ea) {
    print $_->en. " ".$_->ts."\n"
        if $_->ts ne '';
    }
}
[download]

It prints

item1
itemName jeans501
itemId j501ab
countryOrgin mexico
item2
itemName jeans502
itemId j502ab
countryOrgin mexico
[download]