Sorting Arrays in Perl

The sort() function in Perl sorts each element of an array according to the ASCII Numeric standards. This function has the following syntax −

Syntax

sort [ SUBROUTINE ] LIST

This function sorts the LIST and returns the sorted array value. If SUBROUTINE is specified then specified logic inside the SUBROUTINE is applied while sorting the elements.

Example

 Live Demo

#!/usr/bin/perl
# define an array
@foods = qw(pizza steak chicken burgers);
print "Before: @foods\n";
# sort this array
@foods = sort(@foods);
print "After: @foods\n";

Output

This will produce the following result −

Before: pizza steak chicken burgers
After: burgers chicken pizza steak

Please note that sorting is performed based on the ASCII Numeric value of the words. So the best option is to first transform every element of the array into lowercase letters and then perform the sort function.

Mohd Mohtashim

Updated on 29-Nov-2019 05:11:45

• Related Questions & Answers
• Merging Arrays in Perl
• Perl Sequential Number Arrays
• Transform Perl Strings into Arrays
• Transform Perl Arrays to Strings
• Sorting arrays by two criteria in JavaScript
• Sorting arrays using bubble sort in JavaScript
• Sorting an integer without using string methods and without using arrays in JavaScript
• Sorting in C++
• Comments in Perl
• Whitespaces in Perl
• Dereferencing in Perl
• Topological Sorting
• Structure Sorting in C++
• Alternative Sorting in C++
• Pancake Sorting in C++