use List::Util qw{ uniq };

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

##</code><code>##

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