=encoding utf8 =head1 NAME =begin original HTTP::WebTest::Test - Test object class =end original HTTP::WebTest::Test - テストオブジェクトクラス =head1 SYNOPSIS use HTTP::WebTest::Test; my $test = HTTP::WebTest::Test->new(%params); my $test = HTTP::WebTest::Test->convert($raw_test); my $value = $test->param($param); my $value = $test->params->{$param}; my $results = $test->results; my $result = $test->result->[0]; $test->result->[0] = $result; $test->results([ @results ]); my $request = $test->request; $test->request($request); my $response = $test->response; $test->response($response); my $response_time = $test->response_time; $test->response_time($response_time); =head1 DESCRIPTION =begin original Objects of this class represent tests. They store both test parameters and test results. =end original このクラスのオブジェクトではテストを表現します. これらはテストパラメータと テスト結果の両方を格納します. =head1 CLASS METHODS (クラスメソッド) =head2 new (%params) =begin original Constructor. =end original コンストラクタ. =head3 Parameters (パラメータ) =over 4 =item * %params =begin original A hash with test parameters. =end original テストパラメータとなるハッシュ. =back =head3 Returns (復帰値) =begin original A new C object. =end original 新しい C オブジェクト. =head2 params =head3 Returns (復帰値) =begin original A reference to a hash with all test parameters. =end original 全てのテストパラメータを格納するハッシュへのリファレンス. =head2 param ($param) =head3 Returns (復帰値) =begin original A value of test parameter named C<$param>. =end original C<$param> の名前を持つテストパラメータの値. =head2 results ($optional_results) =begin original Can set L objects for this C object if an array reference C<$optional_results> is passed. =end original もし配列リファレンス C<$optional_results> が渡されるとこの C オブジェクト用の L を設定します. =head3 Returns (復帰値) =begin original A reference to an array that contains L objects. =end original L オブジェクトの を格納する配列へのリファレンス. =head2 request ($optional_request) =begin original If parameter C<$optional_request> is passed, set L object for this C object. =end original パラメータ C<$optional_request> が渡されるとこの C オブジェクト用の L オブジェクトを設定します. =head3 Returns (復帰値) =begin original A L object. =end original L オブジェクト. =head2 response ($optional_response) =begin original If parameter C<$optional_response> is passed, set L object for this C object. =end original パラメータ C<$optional_response> が渡されるとこの C オブジェクト用の L オブジェクトを 設定します. =head3 Returns (復帰値) =begin original A L object. =end original L オブジェクト. =head2 response_time ($optional_response_time) =begin original If parameter C<$optional_response_time> is passed, set response time for this C object. =end original パラメータ C<$optional_response_time> が渡されるとこの C オブジェクト用のレスポンスタイムを設定します. =head3 Returns (復帰値) =begin original A response time. =end original レスポンスタイム. =head2 convert ($test) =begin original Tries to convert test definition in some form into C object. Currenlty supports test defintion in form of C object (it is just passed through) or in the form of hash reference: =end original ある形式で定義されたテストを C オブジェクトに 変換を試みます. 現在のところは C オブジェクトの 形式もしくは以下のようなハッシュリファレンスの形式のテスト定義を サポートしています: { test_param1 => test_value1, test_param2 => test_value2 } =head3 Returns (復帰値) =begin original A new C object. =end original 新しい C オブジェクト. =head2 reset () =begin original Resets test object =end original テストオブジェクトをリセットします. =head1 COPYRIGHT Copyright (c) 2001-2003 Ilya Martynov. All rights reserved. =begin original This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =end original このプログラムはフリーソフトウェアです. このプログラムは Perl 自身と同じ条件下で再配布・改変可能です. =head1 SEE ALSO L L L L L