in reply to Re: Replacment for Data::Diver due missing license
in thread Replacment for Data::Diver due missing license

This doesn't work for numeric hash keys:
Dive({a => {-123 => ['c']}}, qw( a -123 0 )); # Not an ARRAY reference at ...
while Data::Diver's Dive happily returns c.

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]