



電子メール送信のテスト用ドライバ
使い方:
use Email::Send;
my $sender = new Email::Send( { mailer => 'Test' } );
$sender->send($message);
my @mails = $sender->emails;
送信された電子メールをトラップしたEmail::Simpleオブジェクトを返す。
複数の電子メールが送信されても全てトラップしてリスト形式で返してくる。
my $count = $sender->emails;
送信された電子メール数を返す。
$sender->clear;
トラップした電子メールを削除する。