GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages
Test::Classy(3) User Contributed Perl Documentation Test::Classy(3)

Test::Classy - write your unit tests in other modules than *.t

in your test file (t/some_test.t):

    use lib 't/lib';
    use Test::Classy;
    use MyApp::Model::DB;

    # prepare things you want to use in the tests (if you prefer)
    my $db = MyApp::Model::DB->connect;

    # load every test packages found under MyApp::Test::
    load_tests_from 'MyApp::Test';

    # or load it explicitly
    load_test 'MyApp::OtherTest::ForSomething';

    # you can limit tests only with Model attribute
    limit_tests_by 'Model';

    # run each of the tests ($db will be passed as an argument)
    # usually you don't need to declare plan of the tests here.
    run_tests( $db );

    # let's do some cleanings
    END { $db->disconnect; }

in your unit test class:

    package MyApp::Test::Something;
    use Test::Classy::Base;

    # write 'Test' attribute to test
    sub for_some : Test {
      my ($class, @args) = @_;

      # some unit test
      ok 1, "you can use Test::More's functions by default";
    }

    # you can declare the number of tests in a unit
    sub for_others : Tests(2) {
      my ($class, @args) = @_;

      pass 'first';
      pass 'second';
    }

    # tests will be skipped with 'Skip' attribute
    sub yet_another : Tests(2) Skip(for some reason) {
      my ($class, @args) = @_;

      pass 'but this test will be skipped';
      fail 'but this test will be skipped, either';
    }

    # TODO should work as you expect, too.
    sub may_fail : Tests TODO(for some reason) {
      my ($class, @args) = @_;

      fail 'until something is implemented';
    }

    # you can add any attributes to limit
    sub test_for_model : Test Model {
      my ($class, @args) = @_;

      # you can use $class->test_name to show the name of the test
      pass $class->test_name;  # "test_for_model"
    }

This is yet another Test::Class-like unit testing framework. As stated in Test::Class pod, you don't need to care if your tests are small and working correctly. If not, this may be one of your options.

Unlike Test::Class, Test::Classy (actually Test::Classy::Base) is based on Test::More and exports everything Test::More exports. Test::Classy doesn't control test flow as fully as Test::Class, but it may be easier to skip and limit tests.

takes a namespace as an argument and loads all the classes found under that (so, you may want to 'use lib' first). If you have some base test classes there, you may want to add 'ignore_me' (or 'ignore') option to 'use Test::Classy::Base' to be ignored while testing.

  (in your .t file)
    use Test::Classy;
    use lib 't/lib';

    load_tests_from 'MyApp::Test';
    run_tests;

  (in your test base class)
    package MyApp::Test::Base;
    use Test::Classy::Base;

    # not only children but base class itself will test this
    # (probably with different settings)
    sub for_both : Test {}

  (in other base class)
    package MyApp::Test::AnotherBase;
    use Test::Classy::Base 'ignore_me';

    # only children will test this.
    sub for_children_only : Test {}

takes a complete class name and loads it to test.

takes attribute names to limit tests that will be executed. You may want to specify test targets while debugging.

may take optional arguments and runs each of the loaded tests with those arguments.

returns the number of declared test. You usually don't need to declare test plan in .t files, but if you really want to add extra tests there (especially 'use_ok' or 'isa_ok' tests for context class/objects to share), use this to calculate the real plan.

  (in your .t file)
    use Test::Classy;

    load_tests_from 'MyApp::Test';

    Test::More::plan(tests => Test::Classy->plan + 1);
    run_tests;

    pass 'the extra tests';

If you want to use 'no_plan', declare it (plan "no_plan") beforehand by yourself, or use 'Test(no_plan)' attribute somewhere in your test classes.

removes loaded tests. mainly for the tests of Test::Classy itself.

Test::Class

Kenichi Ishigaki, <ishigaki@cpan.org>

Copyright (C) 2008 by Kenichi Ishigaki.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

2014-11-07 perl v5.32.1

Search for    or go to Top of page |  Section 3 |  Main Index

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with ManDoc.