NAME

Email::Send::Netease - Send email with Netease's SMTP servers

VERSION

Version 0.01

SYNOPSIS

use Email::Send::Netease;
my $smtp = Email::Send::Netease->new('john@126.com','mypasswd');
$smtp->sendmail($subject,$content,'foo@163.com','bar@sina.com');

METHODS

new($email, $password, [$debug])

Create the object.

The email and password are what you registered on Netease, whose domains include 126.com, 163.com, 188.com, yeah.net

my $smtp = Email::Send::Netease->new('foo@126.com','password');
# my $smtp = Email::Send::Netease->new('foo@163.com','password');
# my $smtp = Email::Send::Netease->new('foo@188.com','password');
# my $smtp = Email::Send::Netease->new('foo@yeah.net','password');
# or with debug
my $smtp = Email::Send::Netease->new('foo@126.com','password',1);

sendmail($subject, $content, @recepients)

Send the message.

The subject and content can be Chinese (if so they must be UTF-8 string). They will be encoded with UTF-8 for sending.

The message content should be HTML syntax compatible, it will be sent as HTML format.

my $subject = "Hello there";
my $content = "<P>Hi there:</P><P>How are you?</P>";

$smtp->sendmail($subject,$content,'foo@163.com');
# send to more than one people
$smtp->sendmail($subject,$content,'foo@163.com','bar@sina.com', ...);

AUTHOR

Ken Peng <yhpeng@cpan.org>

BUGS/LIMITATIONS

If you have found bugs, please send email to <yhpeng@cpan.org>

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc Email::Send::Netease

COPYRIGHT & LICENSE

Copyright 2012 Ken Peng, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.