Array Perl

  1. Home
  2. Perl
  3. Array
  4. Sort a string array
#!/usr/bin/perl -w
use strict;
my @unsorted = qw(A C B E D);
print "Unsorted: @unsorted\n";
my @sorted = sort @unsorted;
print "Sorted:   @sorted\n";