foreach my $mail ( @mail ) {