Index: t/pmc/eval.t =================================================================== --- t/pmc/eval.t (revision 34764) +++ t/pmc/eval.t (working copy) @@ -316,6 +316,8 @@ 2 1 1 1 OUTPUT +TODO: { +local $TODO = "TT#121 rm \$temp_pbc permission denied" if $^O eq 'cygwin'; pir_output_is( <<"CODE", <<'OUTPUT', "eval.get_string - same file" ); .sub main :main @@ -356,6 +358,7 @@ CODE hello from foo_1 OUTPUT +} my (undef, $temp_file) = create_tempfile( UNLINK => 1 );