LINUX.ORG.RU

Perl script для Sendmail


0

0

Как открыть sendmail для отправки письма через Perl скрипт?

#!/usr/bin/perl

open(SENDMAIL, "????????????????????"); print SENDMAIL ?????????????????????; close SENDMAIL;


#!/usr/bin/perl

open  (SENDMAIL, ">", "send.data");
print (SENDMAIL  "Subject: test\n\nHello, this is a test.\n.\n");
close (SENDMAIL);

`sendmail dima < send.data`;

`rm -f send.data`;

DiMoN ★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.