Select Code to Download

#  dereference an array or an hash
sub de_ref
...
{ return
    map {ref $_ eq 'HASH' ? (sort values %$_) : ($_) } @_;
}