TIMTOWTDI via XML::XPath

use XML::XPath;
use Data::Dumper;

my $xpath   = XML::XPath->new(ioref => *DATA);
my $nodeset = $xpath->find('/type/config');

print map $_->toString, $nodeset->get_nodelist;

__DATA__
<type name="bla">
    <display>BLA BLA</display>
    <data>
      <item>FIRST</item>
      <item>SECOND</item>
    </data>
    <config>
      <field id="test" name="test1">
        <display>MY TEST</display>
      </field>
    </config>
</type>
[download]

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)