TODO blocks

         TODO: {
             local $TODO = $why;

             ok( foo(),       $test_name );
             is( foo(42), 23, $test_name );
         };

• Used when tests inside block are expected to fail due to:

  • Bug in program

  • Code for tests not yet written

         TODO: {
             local $TODO = "Don't yet understand relativity"; 

             is( $E, $m * $c**2, "Relativity understood" );
         };