multi sub quicksort () { () } multi sub quicksort ( $x, *@xs ) { @xs.grep( { $_ < $x } ).quicksort, $x, @xs.grep( { $_ >= $x } ).quicksort } quicksort(1,5,2,4,3)