{
	my $b = Test::Block->expecting(scalar(@foo));
	# @foo tests
}
{
	my $b = Test::Block->expecting(scalar(%bar));
	# %bar tests
}
{
	my $b = Test::Block->expecting(3 * $ni);
	# $ni tests
}