1#!/usr/bin/perl -w
2
3BEGIN {
4    if( $ENV{PERL_CORE} ) {
5        @INC = ('../lib', 'lib');
6    }
7    else {
8        unshift @INC, 't/lib';
9    }
10}
11chdir($^O eq 'VMS' ? 'BFD_TEST_ROOT:[t]' : 't');
12
13
14use strict;
15use Test::More tests => 3;
16use File::Path;
17
18rmtree('Big-Dummy');
19ok(!-d 'Big-Dummy', 'Big-Dummy cleaned up');
20rmtree('Problem-Module');
21ok(!-d 'Problem-Module', 'Problem-Module cleaned up');
22rmtree('dummy-install');
23ok(!-d 'dummy-install', 'dummy-install cleaned up');
24