use List::Util qw( uniq );

my @uniqWebCustomers = uniq @webCustomers;