+
+ my $missing = 0;
+ my @required = @{ $config->{attributes_required} };
+ foreach my $attr ( @required ) {
+ next if grep { /^\Q$attr\E$/i } $entry->attributes;
+ $missing++;
+ diag "$missing missing $attr\n";
+ }
+
+ ok( ! $missing, "attributes " . dump( @required ) );