How to get a Random Item in a Set in Perl

◀ Previous Next ▶

How to get a Random Item in a Set in Perl ?

Answer

To get a random item from a set in Perl, you can use the List::Util module's shuffle function.

✐ Examples

1 Get Random Item from Set

In this example,

We import the List::Util module to use its shuffle function.
We create an array named @mySet containing elements.
We shuffle the array using the shuffle function from List::Util.
We retrieve the first item from the shuffled array, which is now a random item from the original set.
Finally, we print the random item to standard output.

Perl Program

use List::Util qw(shuffle);

my @mySet = ('Apple', 'Banana', 'Orange', 'Mango');
my @shuffledSet = shuffle(@mySet);
my $randomItem = $shuffledSet[0];

print "Random item from set: $randomItem\n";

Output

Random item from set: Mango

Summary

In this tutorial, we learned How to get a Random Item in a Set in Perl language with well detailed examples.