+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
+
# README: If you set the env var to a number greater than 10,
# we will use that many children
use Test::More;
plan skip_all => 'DBIC does not actively support threads before perl 5.8.5'
- if $] < '5.008005';
+ if "$]" < 5.008005;
use Scalar::Util 'weaken';
-use lib qw(t/lib);
+
use DBICTest;
my $num_children = $ENV{DBICTEST_THREAD_STRESS} || 1;