use warnings FATAL => 'all';
use strict;
pass "Initial";
TODO:{
local $TODO = "Here is TODO reason";
fail("Failed");
pass("Passed");
}
pass "Last one";
done_testing;