Devel::Tinderbox::Reporter

[Michael G Schwern]

Here's a quick module that does just enough to send reports to
Tinderbox.  We should be able to drop this module into mktest of
Test::Smoke and have it send reports for each individual config.

http://www.pobox.com/~schwern/src/Devel-Tinderbox-Reporter-0.10.tar.gz

Here's a little example of use.

  use Devel::Tinderbox::Reporter;

  my $report = Devel::Tinderbox::Reporter->new({
                          from => '[EMAIL PROTECTED]',
                          to   => '[EMAIL PROTECTED]',
                          project => 'perl6',
                          boxname => 'Schwern blackrider Debian/PowerPC',
                          style   => 'unix/test-harness'
                         });

  $report->start;

  my($build_exit, $make_out) = run_make;
  my($test_exit,  $test_out) = run_tests if $build_exit == 0;

  my $status = $build_exit != 0 ? 'busted'     :
               $test_exit  != 0 ? 'testfailed' :
                                  'success';
  $report->end($status, "$make_out\n$test_out");


We're going to have to modify warnings.pl in Tinderbox to grok perl's
make test output.  The "unix/test-harness" style would indicate we're
using a unix style C compiler (so it will use gcc_parser) plus the
Test::Harness test output style.


-- 

Michael G. Schwern   <[EMAIL PROTECTED]>    http://www.pobox.com/~schwern/
Perl6 Quality Assurance     <[EMAIL PROTECTED]>       Kwalitee Is Job One
I'm spanking my yacht.