1#!/usr/bin/perl -w 2 3BEGIN { 4 if( $ENV{PERL_CORE} ) { 5 chdir 't'; 6 @INC = '../lib'; 7 } 8} 9 10use strict; 11use warnings; 12 13# Can't use Test::More, that would set exported_to() 14use Test::Builder; 15use Test::Builder::Module; 16 17my $TB = Test::Builder->create; 18$TB->plan( tests => 1 ); 19$TB->level(0); 20 21$TB->is_eq( Test::Builder::Module->builder->exported_to, 22 undef, 23 'using Test::Builder::Module does not set exported_to()' 24); 25