my %seen; my @uniqWebCustomers = grep !$seen{$_}++, @webCustomers;