my %table = get_duplicates(); # More complicated, but you get the idea.
my @addresses = sort keys %table;
my $report = form {bullet => '*'},
'+-----------------------------------------------------------+',
'| {[[[[[[[[[[[[[[[[[[[[[[[[[[[}   * {[[[[[[[[[[[[[[[[[[[[[} |',
\@addresses, [map { $table{$_} @adresses],
'|                                                           |',
'+-----------------------------------------------------------+';