• Подпрограмма не может быть рекурсивной.
• Два сравниваемых между собой элемента массива передаются в подпрограмму не через массив @_, а как глобальные переменные текущего пакета с зарезервированными именами $a и $b.
• Передача аргументов осуществляется по адресу, и значения переменных $a и $b не изменяются.
• Не допускается определение этих переменных как лексических.
• Вы не можете завершить работу подпрограммы с помощью конструкций управления циклом или оператора goto.

# лексическая сортировка 
@articles = sort @files;
# то же, но с введением собственной процедуры сравнения 
@articles = sort ($a cmp $b} @files;
# а теперь игнорируем регистр
@articles = sort { uc($a) cmp uc($b) } @files;
# а теперь сортируем в обратном порядке 
@articles = sort {$b cmp $a} @files;
# сортировка в порядке возрастания чисел 
@articles = sort {$a <=> $b} @files;
# числовая сортировка в обратном порядке 
@articles = sort {$b <=> $а} @files;
# сортировка с определением подпрограммы сравнения 
sub byage {
      $age{$a} <=> $age{$b};   # полагаем, что в массиве числа
}
@sortedclass = sort byage @class;
# сортировка хэш-массива %age по значениям, вместо
# ключей, с помощью вложенной функции
@eldest = sort { $age{$b} <=> $age{$a} } keys %age;