Test::More Features

• SKIP blocks

        SKIP: {
            skip "Not supported before 5.005", 1 if $] < 5.005;
            is ($text, $result8, "Was the output correct?");
        }

• and TODO blocks

        TODO: {
            ok($text, $result8, "working on test");
        }