Mail::Send - Simple electronic mail interface
require Mail::Send;
$msg = new Mail::Send;
$msg = new Mail::Send Subject=>'example subject', To=>'timbo';
$msg->to('user@host'); $msg->subject('example subject'); $msg->cc('user@host'); $msg->bcc('someone@else');
$msg->set($header, @values); $msg->add($header, @values); $msg->delete($header);
# Launch mailer and set headers. The filehandle returned # by open() is an instance of the Mail::Mailer class. # Arguments to the open() method are passed to the Mail::Mailer # constructor.
$fh = $msg->open; # some default mailer # $fh = $msg->open('sendmail'); # explicit
print $fh "Body of message";
$fh->close; # complete the message and send it
$fh->cancel; # not yet implemented
Original code written by Tim Bunce <Tim.Bunce@ig.co.uk>, with a kick start from Graham Barr <gbarr@pobox.com>. With contributions by Gerard Hickey <hickey@ctron.com>
Copyright (c) 2002-2003 Mark Overmeer. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Закладки на сайте Проследить за страницей |
Created 1996-2024 by Maxim Chirkov Добавить, Поддержать, Вебмастеру |