1#! /usr/bin/perl -Tw 2 3use strict; 4use warnings; 5use Test::More; 6 7BEGIN { use_ok( 'Test::Exception', tests => 2 ) }; 8 9is( Test::Builder->new->expected_tests, 2, 'Test::Exception set plan' );