use Data::Dumper;
print Dumper(\%randList);

##</code><code>##

foreach my $key (keys %randList) {
    push(@numList, $key);
}

##</code><code>##

@numList = keys %randList;