use List::Util qw{ uniq };

%teamAcctsUniq = map {
    $_ => [ uniq(@{ $teamAccts{$_} }) ]
} keys %teamAccts;