Scroll to navigation

Test::Exit(3pm) User Contributed Perl Documentation Test::Exit(3pm)

NAME

Test::Exit - Test that some code calls exit() without terminating testing

VERSION

version 0.03

SYNOPSIS

    use Test::More tests => 4;
    use Test::Exit;
    
    exits_ok { exit 1; } "exiting exits"
    never_exits_ok { print "Hi!"; } "not exiting doesn't exit"
    exits_zero { exit 0; } "exited with success"
    exits_nonzero { exit 42; } "exited with failure"

DESCRIPTION

Test::Exit provides some simple tools for testing that code does or does not call "exit()", while stopping code that does exit at the point of the "exit()". Currently it does so by means of exceptions, so it will not function properly if the code under test calls "exit()" inside of an "eval" block or string.
The only criterion tested is that the supplied code does or does not call "exit()". If the code throws an exception, the exception will be propagated and you will have to call it yourself. "die()"ing is not exiting for the purpose of these tests.
exits_ok
Tests that the supplied code calls "exit()" at some point.
exits_nonzero
Tests that the supplied code calls "exit()" with a nonzero value.
exits_zero
Tests that the supplied code calls "exit()" with a zero (successful) value.
never_exits_ok
Tests that the supplied code completes without calling "exit()".

AUTHOR

  Andrew Rodland <andrew@hbslabs.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2009 by HBS Labs, LLC..
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
2009-12-04 perl v5.10.1