How to Shuffle an Array in Perl - Step by Step Examples

How to Shuffle an Array in Perl ?

Answer

In Perl, you can shuffle an array using the shuffle function provided by the List::Util module, which implements the Fisher-Yates shuffle algorithm.

✐ Examples

1 Shuffle Array of Integers

In this example,

We have an array named @int_array containing integers.
We use the shuffle function from List::Util to shuffle @int_array.
We print the shuffled array to demonstrate the shuffling.

Perl Program

use List::Util qw(shuffle);
my @int_array = (1, 2, 3, 4, 5);
my @shuffled_array = shuffle(@int_array);
print 'Shuffled Array:', join(' ', @shuffled_array);

Output

Shuffled Array: 4 1 2 5 3

2 Shuffle Array of Strings

In this example,

We have an array named @str_array containing strings.
We use the shuffle function from List::Util to shuffle @str_array.
We print the shuffled array to demonstrate the shuffling.

Perl Program

use List::Util qw(shuffle);
my @str_array = ('apple', 'banana', 'cherry');
my @shuffled_array = shuffle(@str_array);
print 'Shuffled Array:', join(' ', @shuffled_array);

Output

Shuffled Array: banana apple cherry

Summary

In this tutorial, we learned How to Shuffle an Array in Perl language with well detailed examples.

◀ Previous Next ▶