my @sorted = map { $_->[1] }
    sort { $a->[0] cmp $b->[0] }
    map {
        my $item = $nodes->item( $_ );
        [ $item->getAttributeNode( 'name' )->getValue(), $item ]
    } 0 .. $nodes->getLength() ;