Select Code to Download

use Data::Dumper;
print Dumper($hComData);

    my ($chn, $ex) = sort ($hEntry->{chain}, $hEntry->{exists});