Do I need this? I'm getting six to nine dupes to the same recipient from a worm, and even though I can deny that worm at rcpt, I'd like to fix the hole, wherever it is, that is allowing duplicate recipients for one message.
sub _uniq { my %u = () ; for ( @_ ) { $_ and $u{$_} = 1 } ; keys %u if ref \%u ; } Fits into such-- for ( &_uniq ( $transaction->recipients ) ) { # queue ops