my $log = "";
for my $item (@stuff) {
  do_something($item);
  $log .= "Email sent to: $item<br>\n";
}

print $log_file $log;