# client code - variant a
# (client wants values and count)
my @uniq_list = uniq $obj->get_list();
my $uniq_count = scalar @uniq_list;

# client code - variant b
# (client just wants the count)
my $uniq_count = scalar uniq $obj->get_list();