print Dumper h(sub {$_[0] <=> $_[1]}, 1..6, -3);