Yeah, there's an optimization in perl that stores feature bundles in $^H instead of %^H, as you can see it is an effective optimization. Though in practice it shouldn't really matter much in most cases, this is a fairly contrived example.