test::harness::assert(3pm) [osx man page]

Test::Harness::Assert(3pm)				 Perl Programmers Reference Guide				Test::Harness::Assert(3pm)

NAME

       Test::Harness::Assert - simple assert

SYNOPSIS

	 ### FOR INTERNAL USE ONLY ###

	 use Test::Harness::Assert;

	 assert( EXPR, $name );

DESCRIPTION

       A simple assert routine since we don't have Carp::Assert handy.

       For internal use by Test::Harness ONLY!

FUNCTIONS

       "assert()"

	 assert( EXPR, $name );

       If the expression is false the program aborts.

AUTHOR

       Michael G Schwern "<schwern at pobox.com>"

SEE ALSO

       Carp::Assert

perl v5.10.0							    2007-12-18						Test::Harness::Assert(3pm)

Test::Harness::Results(3pm)				 Perl Programmers Reference Guide			       Test::Harness::Results(3pm)

NAME

       Test::Harness::Results - object for tracking results from a single test file

SYNOPSIS

       One Test::Harness::Results object represents the results from one test file getting analyzed.

CONSTRUCTION

       new()

	   my $results = new Test::Harness::Results;

       Create a test point object.  Typically, however, you'll not create one yourself, but access a Results object returned to you by
       Test::Harness::Results.

ACCESSORS

       The following data points are defined:

	 passing	   true if the whole test is considered a pass
			   (or skipped), false if its a failure

	 exit		   the exit code of the test run, if from a file
	 wait		   the wait code of the test run, if from a file

	 max		   total tests which should have been run
	 seen		   total tests actually seen
	 skip_all	   if the whole test was skipped, this will
			     contain the reason.

	 ok		   number of tests which passed
			     (including todo and skips)

	 todo		   number of todo tests seen
	 bonus		   number of todo tests which
			     unexpectedly passed

	 skip		   number of tests skipped

       So a successful test should have max == seen == ok.

       There is one final item, the details.

	 details	   an array ref reporting the result of
			   each test looks like this:

	   $results{details}[$test_num - 1] =
		   { ok 	 => is the test considered ok?
		     actual_ok	 => did it literally say 'ok'?
		     name	 => name of the test (if any)
		     diagnostics => test diagnostics (if any)
		     type	 => 'skip' or 'todo' (if any)
		     reason	 => reason for the above (if any)
		   };

       Element 0 of the details is test #1.  I tried it with element 1 being #1 and 0 being empty, this is less awkward.

       Each of the following fields has a getter and setter method.

       o   wait

       o   exit

perl v5.10.0							    2007-12-18					       Test::Harness::Results(3pm)