Commit | Line | Data |
---|---|---|
7e521e02 | 1 | #!./perl -Tw |
2 | ||
3 | BEGIN { | |
5638aaac | 4 | if ($ENV{PERL_CORE}){ |
5 | chdir('t') if -d 't'; | |
6 | @INC = ('.', '../lib'); | |
7 | } else { | |
8 | unshift @INC, 't'; | |
9 | } | |
9cd8f857 | 10 | require Config; |
11 | if (($Config::Config{'extensions'} !~ /\bB\b/) ){ | |
12 | print "1..0 # Skip -- Perl configured without B module\n"; | |
13 | exit 0; | |
14 | } | |
7e521e02 | 15 | } |
16 | ||
17 | use Test::More tests => 1; | |
18 | ||
19 | use_ok('B::Bblock', qw(find_leaders)); | |
20 | ||
21 | # Someone who understands what this module does, please fill this out. |