1#!/usr/bin/perl
2
3BEGIN {
4    if( $ENV{PERL_CORE} ) {
5        chdir 't';
6        @INC = '../lib';
7    }
8}
9
10use Test::Builder::Tester tests => 1;
11use Test::More;
12
13eval {
14    test_test("foo");
15};
16like($@,
17     "/Not testing\.  You must declare output with a test function first\./",
18     "dies correctly on error");
19
20