Skip site navigation (1)Skip section navigation (2)

FreeBSD Manual Pages


home | help
TAP::Parser::AggregatorPerl Programmers	Reference GuTAP::Parser::Aggregator(3)

       TAP::Parser::Aggregator - Aggregate TAP::Parser results

       Version 3.42

	   use TAP::Parser::Aggregator;

	   my $aggregate = TAP::Parser::Aggregator->new;
	   $aggregate->add( 't/00-load.t', $load_parser	);
	   $aggregate->add( 't/10-lex.t',  $lex_parser	);

	   my $summary = <<'END_SUMMARY';
	   Passed:  %s
	   Failed:  %s
	   Unexpectedly	succeeded: %s
	   printf $summary,
		  scalar $aggregate->passed,
		  scalar $aggregate->failed,
		  scalar $aggregate->todo_passed;

       "TAP::Parser::Aggregator" collects parser objects and allows
       reporting/querying their	aggregate results.

   Class Methods

	my $aggregate =	TAP::Parser::Aggregator->new;

       Returns a new "TAP::Parser::Aggregator" object.

   Instance Methods

	 $aggregate->add( $description => $parser );

       The $description	is usually a test file name (but only by convention.)
       It is used as a unique identifier (see e.g.  "parsers".)	 Reusing a
       description is a	fatal error.

       The $parser is a	TAP::Parser object.


	 my $count   = $aggregate->parsers;
	 my @parsers = $aggregate->parsers;
	 my @parsers = $aggregate->parsers(@descriptions);

       In scalar context without arguments, this method	returns	the number of
       parsers aggregated.  In list context without arguments, returns the
       parsers in the order they were added.

       If @descriptions	is given, these	correspond to the keys used in each
       call to the add() method.  Returns an array of the requested parsers
       (in the requested order)	in list	context	or an array reference in
       scalar context.

       Requesting an unknown identifier	is a fatal error.


       Get an array of descriptions in the order in which they were added to
       the aggregator.


       Call "start" immediately	before adding any results to the aggregator.
       Among other times it records the	start time for the test	run.


       Call "stop" immediately after adding all	test results to	the


       Elapsed returns a Benchmark object that represents the running time of
       the aggregated tests. In	order for "elapsed" to be valid	you must call
       "start" before running the tests	and "stop" immediately afterwards.


       Returns a formatted string representing the runtime returned by
       "elapsed()".  This lets the caller not worry about Benchmark.


       Return true if all the tests passed and no parse	errors were detected.


       Get a single word describing the	status of the aggregated tests.
       Depending on the	outcome	of the tests returns 'PASS', 'FAIL' or
       'NOTESTS'. This token is	understood by CPAN::Reporter.

   Summary methods
       Each of the following methods will return the total number of
       corresponding tests if called in	scalar context.	 If called in list
       context,	returns	the descriptions of the	parsers	which contain the
       corresponding tests (see	"add" for an explanation of description.

       o   failed

       o   parse_errors

       o   passed

       o   planned

       o   skipped

       o   todo

       o   todo_passed

       o   wait

       o   exit

       For example, to find out	how many tests unexpectedly succeeded (TODO
       tests which passed when they shouldn't):

	my $count	 = $aggregate->todo_passed;
	my @descriptions = $aggregate->todo_passed;

       Note that "wait"	and "exit" are the totals of the wait and exit
       statuses	of each	of the tests. These values are totalled	only to
       provide a true value if any of them are non-zero.


	 my $tests_run = $aggregate->total;

       Returns the total number	of tests run.


	 if ( $parser->has_problems ) {

       Identical to "has_errors", but also returns true	if any TODO tests
       unexpectedly succeeded.	This is	more akin to "warnings".


	 if ( $parser->has_errors ) {

       Returns true if any of the parsers failed.  This	includes:

       o   Failed tests

       o   Parse errors

       o   Bad exit or wait status


	 # deprecated in favor of 'todo_passed'.  This method was horribly misnamed.

       This was	a badly	misnamed method.  It indicates which TODO tests
       unexpectedly succeeded.	Will now issue a warning and call

See Also


perl v5.32.0			  2020-06-14	    TAP::Parser::Aggregator(3)


Want to link to this manual page? Use this URL:

home | help