Re: Quicksort problem

If you add print "@_"; to the top of your sub, you'll see the problem.

Even when @less, @great and $pivot are empty, you still recurse.

Changing your first line to: my $pivot=pop // return; will allow the recursion to terminate.

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.

"Science is about questioning the status quo. Questioning authority".

In the absence of evidence, opinion is indistinguishable from prejudice.

Comment on Re: Quicksort problem Select or Download Code

Replies are listed 'Best First'.
Re^2: Quicksort problem by JediMasterT (Sexton) on Nov 22, 2011 at 13:49 UTC
how does the `//` part work?	[reply] [d/l]
Re^3: Quicksort problem by Limbic~Region (Chancellor) on Nov 22, 2011 at 14:12 UTC
JediMasterT, See perlop. The // operator essentially is a special or operator where it is testing the left hand side for definedness. I am pretty sure this became available in perl 5.10 four years ago but you can check perlhist and perldelta if you want to be sure. Cheers - L~R	[reply]
Re^3: Quicksort problem by choroba (Cardinal) on Nov 22, 2011 at 14:13 UTC
If the left part is not defined, the right is returned, otherwise the left one is. See perlop.	[reply]