Test::Chimps::Client - Send smoke test results to a server
Version 0.05
This module simplifies the process of sending smoke test results (in the form of Test::TAP::Models) to a smoke server.
use Test::Chimps::Client;
use Test::TAP::Model::Visual;
chdir "some/module/directory";
my $model = Test::TAP::Model::Visual->new_with_tests(glob("t/*.t"));
my $client = Test::Chimps::Client->new(
server => 'http://www.example.com/cgi-bin/smoke-server.pl',
model => $model
);
my ($status, $msg) = $client->send;
if (! $status) {
print "Error: $msg\n";
exit(1);
}
Creates a new Client object. ARGS is a hash whose valid keys are:
Optional. Does not currently work
Mandatory. The value must be a Test::TAP::Model. These are the test results that will be submitted to the server.
Optional. A hashref of report variables and values to send to the server.
Mandatory. The URI of the server script to upload the model to.
Submit the specified model to the server. This function's return value is a list, the first of which indicates success or failure, and the second of which is an error string.
There are read-only accessors for compress, model, report_variables, and server.
Zev Benjamin, <zev at cpan.org>
Please report any bugs or feature requests to bug-test-chimps at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Test-Chimps-Client. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
You can find documentation for this module with the perldoc command.
perldoc Test::Chimps::Client
You can also look for information at:
Chimps has a mailman mailing list at chimps@bestpractical.com. You can subscribe via the web interface at http://lists.bestpractical.com/cgi-bin/mailman/listinfo/chimps.
Some code in this module is based on smokeserv-client.pl from the Pugs distribution.
Copyright 2006 Best Practical Solutions. Portions copyright 2005-2006 the Pugs project.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
