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.

SEE ALSO

HTTP::WebTest

HTTP::WebTest::API

HTTP::WebTest::Test