plan 'tests' => scalar @Tests;

foreach my $test (@Tests) {
    my $result = eval { Foo->new( $test->{params} ); 'ok' };
    my $desc = $test->{desc} || 'test Foo->new';
    is( $result, $test->{result}, $desc );
}