$iterator = Package::units->search_distinct(name);
while ($iterator->next) { print };

foo
bar
baz