On Thu, Apr 29, 2004 at 02:01:12PM +0200, H.Merijn Brand wrote:
> Is it possible to have T::M skip the rest of the script from here on on a
> certain condition?

Its pretty trivial with Test::Builder.

use Test::Builder;
$TB = Test::Buider->new;
sub skip_rest {
        my($why) = @_;
        my $num_left = $TB->expected_tests - $TB->current_test;
        $TB->skip($why) for 1..$num_left;
        exit;
}

-- 
Michael G Schwern        [EMAIL PROTECTED]  http://www.pobox.com/~schwern/
Let's leave my ass out of this, shall we?

Reply via email to