prefer BAIL_OUT over printf
Jens Rehsack
10 years ago
2 | 2 |
use Test::More tests => 1;
|
3 | 3 |
|
4 | 4 |
BEGIN {
|
5 | |
use_ok( 'MooX::File::ConfigDir' ) || print "Bail out!
|
6 | |
";
|
|
5 |
use_ok( 'MooX::File::ConfigDir' ) || BAIL_OUT "Couldn't load MooX::File::ConfigDir";
|
7 | 6 |
}
|
8 | 7 |
|
9 | 8 |
diag( "Testing MooX::File::ConfigDir $MooX::File::ConfigDir::VERSION, Perl $], $^X" );
|