6 use Test::More tests => 1;
9 skip 'This would require extensive work to be okay with perl 5.8' => 1
16 # Force %^H repopulation with an Unicode match
22 map { $_, defined $^H{$_} ? $^H{$_} : '(undef)' }
24 is $hints, 'a,1', 'indirect does not vivify entries in %^H';