#!/usr/bin/perl -w
BEGIN {
if( $ENV{PERL_CORE} ) {
chdir 't';
@INC = ('../lib', 'lib');
}
else {
unshift @INC, 't/lib';
}
}
use Test::More;
my $result;
BEGIN {
eval {
require_ok("Wibble");
};
$result = $@;
}
plan tests => 1;
like $result, '/^You tried to run a test without a plan/';