my @email_address; # massive with addresses
foreach my $address (@email_addresses) {
      $t->cmd("mailx -s 'usage' $address <test$date.txt");
}