refute_these {
    like $foo->{bar}, qr/f?o?r?m?a?t/;
    can_ok $foo->{baz}, qw(do_this do_that frobnicate);
    is_between $foo->{price}, 10, 1000, "Price is reasonable";
};