Test::Reporter - sends test results to email@example.com
use Test::Reporter; my $reporter = Test::Reporter->new(); $reporter->grade('pass'); $reporter->distribution('Mail-Freshmeat-1.20'); $reporter->send() || die $reporter->errstr(); # or my $reporter = Test::Reporter->new(); $reporter->grade('fail'); $reporter->distribution('Mail-Freshmeat-1.20'); $reporter->comments('output of a failed make test goes here...'); $reporter->edit_comments(); # if you want to edit comments in an editor $reporter->send('firstname.lastname@example.org') || die $reporter->errstr(); # or my $reporter = Test::Reporter->new( grade => 'fail', distribution => 'Mail-Freshmeat-1.20', from => 'email@example.com (Whoever Wherever)', comments => 'output of a failed make test goes here...', via => 'CPANPLUS X.Y.Z', ); $reporter->send() || die $reporter->errstr();
Test::Reporter reports the test results of any given distribution to the CPAN Testers. Test::Reporter has wide support for various perl5's and platforms. For further information visit the below links:
CPAN Testers reports (new site)
CPAN Testers reports (old site)
The new CPAN Testers Wiki (thanks Barbie!)
The cpan-testers mailing list
Test::Reporter itself--as a project--also has several links for your visiting enjoyment:
Test::Reporter's master project page
Discussion group for Test::Reporter
The Wiki for Test::Reporter
Test::Reporter's public git source code repository.
Test::Reporter on CPAN
UNFORTUNATELY, WE ARE UNABLE TO ACCEPT TICKETS FILED WITH RT.
Please file all bug reports and enhancement requests at our Google Code issue tracker. Thank you for your support and understanding.
If you happen to--for some strange reason--be looking for primordial versions of Test::Reporter, you can almost certainly find them at the above 2 links.
Optional. Gets or sets the e-mail address that the reports will be sent to. By default, this is set to firstname.lastname@example.org. You shouldn't need this unless the CPAN Tester's change the e-mail address to send report's to.
Optional. Gets or sets the comments on the test report. This is most commonly used for distributions that did not pass a 'make test'.
Optional. Gets or sets the value that will turn debugging on or off. Debug messages are sent to STDERR. 1 for on, 0 for off. Debugging generates very verbose output and is useful mainly for finding bugs in Test::Reporter itself.
Optional. Defaults to the current working directory. This method specifies the directory that write() writes test report files to.
Gets or sets the name of the distribution you're working on, for example Foo-Bar-0.01. There are no restrictions on what can be put here.
Optional. Allows one to interactively edit the comments within a text editor. comments() doesn't have to be first specified, but it will work properly if it was. Accepts an optional hash of arguments:
Optional. Allows one to specify the suffix ("extension") of the temp file used by edit_comments. Defaults to '.txt'.
Returns an error message describing why something failed. You must check errstr() on a send() in order to be guaranteed delivery. This is optional if you don't intend to use Test::Reporter to send reports via e-mail, see 'send' below for more information.
Optional. Gets or sets the e-mail address of the individual submitting the test report, i.e. "email@example.com (Adam Foxson)". This is mostly of use to testers running under Windows, since Test::Reporter will usually figure this out automatically. Alternatively, you can use the MAILADDRESS environmental variable to accomplish the same.
Gets or sets the success or failure of the distributions's 'make test' result. This must be one of:
grade meaning ----- ------- pass all tests passed fail one or more tests failed na distribution will not work on this platform unknown distribution did not include tests
Optional. If you have MailTools installed and you want to have it behave in a non-default manner, parameters that you give this method will be passed directly to the constructor of Mail::Mailer. See Mail::Mailer and Mail::Send for details.
Returns an automatically generated Message ID. This Message ID will later be included as an outgoing mail header in the test report e-mail. This was included to conform to local mail policies at perl.org. This method courtesy of Email::MessageID.
Optional. Gets or sets the mail exchangers that will be used to send the test reports. If you override the default values make sure you pass in a reference to an array. By default, this contains the MX's known at the time of release for perl.org. If you do not have Mail::Send installed (thus using the Net::SMTP interface) and do have Net::DNS installed it will dynamically retrieve the latest MX's. You really shouldn't need to use this unless the hardcoded MX's have become wrong and you don't have Net::DNS installed.
This constructor returns a Test::Reporter object. It will optionally accept named parameters for: mx, address, grade, distribution, from, comments, via, timeout, debug, dir, perl_version, and transport.
Returns a hashref containing _archname, _osvers, and _myconfig based upon the perl that you are using. Alternatively, you may supply a different perl (path to the binary) as an argument, in which case the supplied perl will be used as the basis of the above data.
Returns the actual content of a report, i.e. "This distribution has been tested as part of the cpan-testers...". 'comments' must first be specified before calling this method, if you have comments to make and expect them to be included in the report.
Sends the test report to firstname.lastname@example.org and cc's the e-mail to the specified recipients, if any. If you do specify recipients to be cc'd and you do not have Mail::Send installed be sure that you use the author's @cpan.org address otherwise they will not be delivered. You must check errstr() on a send() in order to be guaranteed delivery. Technically, this is optional, as you may use Test::Reporter to only obtain the 'subject' and 'report' without sending an e-mail at all, although that would be unusual.
Returns the subject line of a report, i.e. "PASS Mail-Freshmeat-1.20 Darwin 6.0". 'grade' and 'distribution' must first be specified before calling this method.
Optional. Gets or sets the timeout value for the submission of test reports. Default is 120 seconds.
Optional. Gets or sets the transport method. If you do not specify a transport, one will be selected automatically on your behalf: If you're on Windows, Net::SMTP will be selected, if you're not on Windows, Net::SMTP will be selected unless Mail::Send is installed, in which case Mail::Send is used.
At the moment, this must be one of either 'Net::SMTP', or 'Mail::Send'. Support for authenticated SMTP may soon be possibly added as well.
If you specify 'Mail::Send' as a transport, you can add an additional argument in the form of an array reference which will be passed to the constructor of the lower-level Mail::Mailer. This can be used to great effect for all manner of fun and enjoyment. ;-)
This is not designed to be an extensible platform upon which to build transport plugins. That functionality is planned for the next-generation release of Test::Reporter, which will reside in the CPAN::Testers namespace.
Optional. Gets or sets the value that will be appended to X-Reported-Via, generally this is useful for distributions that use Test::Reporter to report test results. This would be something like "CPANPLUS 0.036".
These methods are used in situations where you test on a machine that has port 25 blocked and there is no local MTA. You use write() on the machine that you are testing from, transfer the written test reports from the testing machine to the sending machine, and use read() on the machine that you actually want to submit the reports from. write() will write a file in an internal format that contains 'From', 'Subject', and the content of the report. The filename will be represented as: grade.distribution.archname.osvers.seconds_since_epoch.pid.rpt. write() uses the value of dir() if it was specified, else the cwd.
On the machine you are testing from:
my $reporter = Test::Reporter->new ( grade => 'pass', distribution => 'Test-Reporter-1.16', )->write();
On the machine you are submitting from:
my $reporter; $reporter = Test::Reporter->new()->read('pass.Test-Reporter-1.16.i686-linux.220.127.116.116685296.14961.rpt')->send() || die $reporter->errstr(); # wrap in an opendir if you've a lot to submit
write() also accepts an optional filehandle argument:
my $fh; open $fh, '>-'; # create a STDOUT filehandle object $reporter->write($fh); # prints the report to STDOUT
If you specify recipients to be cc'd while using send() (and you do not have Mail::Send installed) be sure that you use the author's @cpan.org address otherwise they may not be delivered, since the perl.org MX's are unlikely to relay for anything other than perl.org and cpan.org.
Copyright (c) 2007 Adam J. Foxson. All rights reserved.
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
This is optional. If it's installed Test::Reporter will try even harder at guessing your mail domain.
This is optional. If it's installed Test::Reporter will dynamically retrieve the mail exchangers for perl.org, instead of relying on the MX's known at the time of this release.
Adam J. Foxson <email@example.com> and Richard Soderberg <firstname.lastname@example.org>, with much deserved credit to Kirrily "Skud" Robert <email@example.com>, and Kurt Starsinic <Kurt.Starsinic@isinet.com> for predecessor versions (CPAN::Test::Reporter, and cpantest respectively).