Test::Class

Test::Class is a Perl module that allows you to easily create test classes in an xUnit/JUnit style.
Download

Test::Class Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Adrian Howard
  • Publisher web site:
  • http://search.cpan.org/~adie/Test-Block-0.11/lib/Test/Block.pm

Test::Class Tags


Test::Class Description

Test::Class is a Perl module that allows you to easily create test classes in an xUnit/JUnit style. Test::Class is a Perl module that allows you to easily create test classes in an xUnit/JUnit style.SYNOPSIS package Example::Test; use base qw(Test::Class); use Test::More; # setup methods are run before every test method. sub make_fixture : Test(setup) { my $array = ; shift->{test_array} = $array; }; # a test method that runs 1 test sub test_push : Test { my $array = shift->{test_array}; push @$array, 3; is_deeply($array, , 'push worked'); }; # a test method that runs 4 tests sub test_pop : Test(4) { my $array = shift->{test_array}; is(pop @$array, 2, 'pop = 2'); is(pop @$array, 1, 'pop = 1'); is_deeply($array, [], 'array empty'); is(pop @$array, undef, 'pop = undef'); }; # teardown methods are run after every test method. sub teardown : Test(teardown) { my $array = shift->{test_array}; diag("array = (@$array) after test(s)"); };later in a nearby .t file #! /usr/bin/perl use Example::Test; # run all the test methods in Example::Test Test::Class->runtests;Outputs: 1..5 ok 1 - pop = 2 ok 2 - pop = 1 ok 3 - array empty ok 4 - pop = undef # array = () after test(s) ok 5 - push worked # array = (1 2 3) after test(s) Requirements: · Perl


Test::Class Related Software