diff -rupN orig/t/101_basic.t new/t/101_basic.t --- orig/t/101_basic.t 2007-08-24 13:18:54.000000000 +0000 +++ new/t/101_basic.t 2013-06-11 19:08:33.129745242 +0000 @@ -24,6 +24,9 @@ ok(1); $scalar = $] < 5.008003 || $] == 5.009 ? 'skip: no scalar context for tied hashes' : ''; +$scalar = $] > 5.017005 + ? 'skip: hash randomization changes make this test invalid' : ''; + $broken_untie = $] == 5.009003 ? 'skip: broken untie' : ''; tie %h, 'Tie::Hash::Indexed';