No se si lo que necesitas es replicar la teoría en código u ordenar una lista utilizando es teoría, en el último caso perl dispone de una función llamada sort que aplica dicha teoría.
Código:
use sort '_quicksort';
@array = qw(2 3 6 5 1 7 9 4 0 10 8);
@array = sort {$a <=> $b} @array;
print "@array"; # quedará 0 1 2 3 4 5 6 7 8 9 10
Mas información:
http://perldoc.perl.org/functions/sort.html
Como anédota una vez leí que un paparucho al momento de tomar programadores les indicaba que debían ordenar una lista utilizando quicksort, aunque la teoría es muy simple, por supuesto que ninguno pudo realizarla, ya que la ciencia computacional es tan amplia que es imposible saberse todas las teoría con las que se han desarrollado funciones en la mayoría de los lenguaje, lo irrisorio es que se quejaba de como tremendo programadores no iban a saberla, asi que pegale una memorizada, no valla a ser que te toque como jefe.