Help for this page

Select Code to Download


  1. or download this
    sub skip_unless (&$$) {
        my ($test, $name, $tests_to_skip) = @_;
    ...
        skip "failed: $name", $tests_to_skip unless $passed;
        return $passed;
    };
    
  2. or download this
    skip_unless { ok $mech->is_html } 'Returns HTML', 3;
    ....
    skip_unless { is $foo, $bar } 'foo == bar', 3;
    ...