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 basicly 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)

If $optional_ok is passed, Defines whether or not test is successful.

Returns

True if test is successful. False otherwise.

comment ($optional_comment)

If $optional_comment is passed, sets test result comment.

Returns

A test result comment.

COPYRIGHT

Copyright (c) 2001-2003 Ilya Martynov. All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

HTTP::WebTest

HTTP::WebTest::API

HTTP::WebTest::Test