use Data::Dump::Streamer;
my $xml = XML::Simple->new();
my $d = $xml->XMLin("sample.xml",ForceArray => 1, KeepRoot => 1);
Dump $d;

##</code><code>##

$HASH1 = { 
  inbox => [ 
    { 
      item => [
        {
          description => [ 'Bar' ],
          title       => [ 'Foo' ]
        },
        {
          description => [ 'Foobar' ],
          title       => [ 'Baz' ]
        }
      ] 
    } 
  ] 
};

##</code><code>##

my $d = $xml->XMLin("sample.xml");

##</code><code>##

$HASH1 = { 
  item => [
    {
      description => 'Bar',
      title       => 'Foo'
    },
    {
      description => 'Foobar',
      title       => 'Baz'
    }
  ] 
};

##</code><code>##

for my $item ( @{ $d->{item} } ) {
  print "$item->{title}\n";          # for example
}