есть гейт на бсд вот его настройки фаерволла
500 allow tcp from any to x.y.z.a 80 710 deny tcp from any to x.y.z.a чтоб заходили только на апача . какие правила надо добавить чтоб с хоста x.y.z.a можно было почту слать
скрипт вот такой #!/usr/bin/perl # # for($i=0;$i<5;$i++){ $mailprog="/usr/sbin/sendmail -i -t"; $mailto1="xxx\@yahoo.com"; print "$i\n"; open(SENDMAIL,"|$mailprog $mailto1"); print SENDMAIL "From:xxx\n"; print SENDMAIL "Subject:support\n"; for ($c=0;$c<1;$c++){ print SENDMAIL "xxxn"; print SENDMAIL "xxx\n"; #print SENDMAIL "xx"; #print SENDMAIL "xxx"; } close(SENDMAIL); }