use File::Basename ();
use File::Spec ();
BEGIN {
    my $testBase = File::Basename::dirname(__FILE__);
    for (0..10) {
        my $testLib = File::Spec->catdir($testBase, 'lib');
        if (-d $testLib) {
            unshift @INC, File::Spec->abs2rel($testLib);
            last;
        }
        $testBase = File::Spec->catdir($testBase, File::Spec->updir);
    }
}