sub foo {
   return $a cmp $b
}
my @sorted = sort foo @unsorted;

##</code><code>##

my @sorted = sort { return $a cmp $b } @unsorted;

##</code><code>##

my @sorted = sort { $a cmp $b } @unsorted;