package Foo;
BEGIN {
+ chdir 't' if -d 't';
@INC = '../lib';
+ require './test.pl';
}
-use Test;
-
-plan tests => 7;
+plan 7;
use constant MyClass => 'Foo::Bar::Biz::Baz';
{
package Foo::Bar::Biz::Baz;
+ 1;
}
for (qw(Foo Foo:: MyClass __PACKAGE__)) {