Blog about system engineering, programming and networks
perl -e 'open my $mail, "| mail -s test test\@domain.ru" or die; print $mail "body"; close $mail '
1.| use MIME::Lite; 2.| $msg = MIME::Lite->new ( 3.| From =>'John Doe ', 4.| To =>'Frank Smith ', 5.| Subject =>'Test.', 6.| Data =>"It's just test!!!" 7.| ); 8.| $msg->send;
Тоже отличный вариант!
Note: only a member of this blog may post a comment.
1.| use MIME::Lite;
ReplyDelete2.| $msg = MIME::Lite->new (
3.| From =>'John Doe ',
4.| To =>'Frank Smith ',
5.| Subject =>'Test.',
6.| Data =>"It's just test!!!"
7.| );
8.| $msg->send;
Тоже отличный вариант!
ReplyDelete