Agent-TCLI-Package-Net
view release on metacpan or search on metacpan
t/dev/TCLI.Package.Net.SMTP.Live.t view on Meta::CPAN
$t->ok('set subject="Test Body Message"');
$t->ok('send body="test 1"');
$t->ok('set subject="Test File Message"');
$t->ok('sendtext textfile="Build.PL"');
$t->ok('set subject="Test Msg Message"');
$t->ok('sendmsg msgfile="t/dev/email.wmsg"');
# Other address formats
$t->ok('set from="\"Testee\" <testee@testing.erichacker.com>"');
$t->ok('send subj="test address escaped quotes"');
$t->ok('set from="\"Testee Jr\" <testee@testing.erichacker.com>"');
$t->ok('send subj="test address escaped quotes with space"');
$t->ok('set from="Testee Jr <testee@testing.erichacker.com>"');
$t->ok('send subj="test address space no quotes"');
# fail for noexistant file
$t->not_ok('sendtext textfile="DONTREADME"');
# fail for bad address
$t->not_ok('set from="Testee testee@testing.erichacker.com"');
( run in 0.434 second using v1.01-cache-2.11-cpan-c21f80fb71c )