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