[perl5.git] / cpan / Test-Simple / t / regression / no_name_in_subtest.t

use strict;
use warnings;

BEGIN { require "t/tools.pl" };

ok(1, "");

tests foo => sub {
    ok(1, "name");
    ok(1, "");
};

done_testing;
Commit	Line	Data
b4514920 CG	1	use strict;
	2	use warnings;
	3
	4	BEGIN { require "t/tools.pl" };
	5
	6	ok(1, "");
	7
	8	tests foo => sub {
	9	ok(1, "name");
	10	ok(1, "");
	11	};
	12
	13	done_testing;