Help for this page

Select Code to Download

Select or download this

sub random {
  my ($user_input, $list) = @_;
...
    return (shuffle @values)[0];
  }    
}