#Use of uninitialized value in length...
 push @new, $d if length $d->{Name} && ! exists $used{ $d->{Name} };