How to Sort a String Array in Dictionary Order in Perl - Step by Step Examples

How to Sort a String Array in Dictionary Order in Perl ?

Answer

To sort a string array in Perl in dictionary order, you can use the `sort` function. To sort in descending order, you can use the `sort` function with a custom comparator or reverse the array after sorting.

✐ Examples

1 Sort String Array Ascending

In this example,

We create an array `@words` with unsorted elements.
We use the `sort` function with the array for ascending order.
We print the sorted array.

Perl Program

@words = ("banana", "apple", "orange", "grape");
@words = sort @words;
print "Sorted Array Ascending:\n";
foreach $word (@words) { print "$word\n"; }

Output

Sorted Array Ascending:
apple
banana
grape
orange

2 Sort String Array Descending

In this example,

We create an array `@words` with unsorted elements.
We use the `sort` function with a custom comparator or reverse the array after sorting for descending order.
We print the sorted array.

Perl Program

@words = ("banana", "apple", "orange", "grape");
@words = sort { $b cmp $a } @words;
print "Sorted Array Descending:\n";
foreach $word (@words) { print "$word\n"; }

Output

Sorted Array Descending:
orange
grape
banana
apple

Summary

In this tutorial, we learned How to Sort a String Array in Dictionary Order in Perl language with well detailed examples.

◀ Previous Next ▶