Test::Smoke::Mailer - Factory for objects to send the report.
use Test::Smoke::Mailer; my %args = ( mhowto => 'smtp', mserver => 'smtp.your.domain' ); my $mailer = Test::Smoke::Mailer->new( $ddir, %args ); $mailer->mail or die "Problem in mailing: " . $mailer->error;
This little wrapper still allows you to use the sendmail, sendemail, mail or mailx programs, but prefers to use the Mail::Sendmail module (which comes with this distribution) to send the reports.
Can we provide sensible defaults for the mail stuff?
mhowto => [Module::Name|sendmail|mail|mailx|sendemail] mserver => an SMTP server || localhost mbin => the full path to the mail binary mto => list of addresses (comma separated!) mfrom => single address mcc => list of addresses (coma separated!)
config() is an interface to the package lexical
%CONFIG, which holds all the default values for the
With the special key all_defaults this returns a reference to a hash holding all the default values.
(c) 2002-2013, All rights reserved.
* Abe Timmerman <email@example.com>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.