NAME
HTTP::WebTest::TestResult - Test results class
SYNOPSIS
use HTTP::WebTest::TestResult;
my $result = HTTP::WebTest::TestResult;
my $bool = $result->ok;
$result->ok($bool);
my $comment = $result->comment;
$result->comment($comment);
if($result) { ... }DESCRIPTION
Objects of this class represent test results. Test results are basicaly ok/not ok and some attached commentary.
This class overloads bool operation so it can be directly used in statements that require boolean values.
if($result) { ... }is equivalent to
if($result->ok) { ... }CLASS METHODS
new ()
Constructor
Returns
A new HTTP::WebTest::TestResult object.
ok ($optional_ok)
Defines if test is successful or not if $optional_ok is passed.
Returns
True if test is successful. False otherwise.
comment ($optional_comment)
Sets test result comment if $optional_comment is passed.
Returns
A test result comment.
COPYRIGHT
Copyright (c) 2001,2002 Ilya Martynov. All rights reserved.
This module is free software. It may be used, redistributed and/or modified under the terms of the Perl Artistic License.