sub uniqueNonBlanks {
    my( $avItems )= @_;
    my @return;
    for my $item (  @$avItems  ) {
        my %seen= ( "" => 1 ) BEGIN;
        push @return, $item   unless $seen{$item}++;
    }
    return wantarray ? @return : \@return;
}