
Test::Count - Module for keeping track of the number of tests in a test script.

$ cat "t/mytest.t" | perl -MTest::Count::Filter -e 'filter()'

Test::Count is a set of perl modules for keeping track of the number of tests in a test file. It works by putting in comments of the form # TEST (one test), # TEST*$EXPR or # TEST+$EXPR (both are multiple tests). Test::Count count these tests throughout the fileand return all of their results.
One can put any mathematical expressions (using parentheses, +, -, *, / and % there). One can also assign variables using # TEST:$myvar=5+6;$second_var=$myvar+3 and later use them in the add to count expressions. A $var++ construct is also available.
One can find example test scripts under t/.
A simple Vim (http://www.vim.org/) function to update the count of the tests in the file is:
function! Perl_Tests_Count()
%!perl -MTest::Count::Filter -e 'Test::Count::Filter->new({})->process()'
endfunction

Creates a new Test::Count object that process the filehandle specified in 'input_fh'. Optional keys are:
A regular expression for specifying the prefix for a "TEST" assertion that updates the grammar. Defaults to "# TEST".
Process the filehandle specified in 'input_fh' in ->new(), and return a hash ref with the following keys:
The count of the test.
The lines of the stream as is.

You can put any mathematical expressions (using parentheses, +, -, *, / and % there). You can also assign variables using # TEST:$myvar=5+6;$second_var=$myvar+3 and later use them in the add to count expressions. A $var++ construct is also available.
You can also do # TEST:source "path-to-file-here.txt" where the filename comes in quotes, in order to include the filename and process it (similar to the C-shell or Bash "source" command) . You can use the special variable $^CURRENT_DIRNAME there for the dirname of the current file.
Finally, # TEST*EXPR() and # TEST+$EXPR() add tests to the count.

Shlomi Fish, <shlomif at cpan.org>

Please report any bugs or feature requests to bug-test-count at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Test::Count. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

You can find documentation for this module with the perldoc command.
perldoc Test::Count
You can also look for information at:


Copyright 2006 Shlomi Fish.
This program is released under the following license: MIT X11.