Select Code to Download

sub rand_elt { $_[rand @_] }

sub rand_elt {
    my @keys = @_;
...
    my $random_index = int( rand($num_keys) );
    return $keys[$random_index];
}