use File::Spec;
use File::Basename qw' dirname ';
BEGIN {
    my $thisf = File::Spec->rel2abs(__FILE__);
    my $thisd = dirname($thisf);
    use lib File::Spec->catfile( $thisd, File::Spec->updir, 'lib' );
}