SKIP: {
	my $b = Test::Block->expecting(4);
	ok(1);
	skip "skip tests", $b->remaining if $foo;
	ok(2);
	skip "skip tests", $b->remaining if $bar;
	ok(3);
	ok(4);
};