my $count = @five;
    print "$id,$accounts_by_id->{$id}{info},$count",
      join(',', @five), "\n";