Re: sort +*, @array

Replies are listed 'Best First'.
Re^2: sort +*, @array by raiph (Deacon) on Dec 09, 2013 at 12:32 UTC
Sorts numerically. (The default is to sort stringwise). »ö« ^{. o O ( "the celebrity tell-all of the Perl-6 cult?" )}	[reply]
Re^3: sort +*, @array by hdb (Monsignor) on Dec 09, 2013 at 12:39 UTC
Thanks for your reply. So it is the Perl 6 equivalent to `say sort {$a <=> $b} @array;`? But how is that statement related to the Schwartzian transformation?	[reply] [d/l]
Re^4: sort +*, @array by raiph (Deacon) on Dec 09, 2013 at 13:53 UTC
The `+` is a "key extractor" closure. This closure corresponds to the before map of the ST. Of course, in the specific case of +, it's trivial to instead just specify a "comparator" closure using <=>, but what if one instead writes: `say sort +.value, 1=>4, 11=>5, 2=>99, 22=>22, 3=>339 # prints 1=>4 11=>5 22=>22 2=>99 3=>339 say sort ~.value, 1=>4, 11=>5, 2=>99, 22=>22, 3=>339 # prints 22=>22 3=>339 1=>4 11=>5 2=>99` [download] (And of course the results of the closure call on a given item is memoized.) »ö« ^{. o O ( "the celebrity tell-all of the Perl-6 cult?" )}	[reply] [d/l] [select]
Re^5: sort +*, @array by hdb (Monsignor) on Dec 09, 2013 at 14:26 UTC
Re^3: sort +*, @array by moritz (Cardinal) on Dec 11, 2013 at 12:27 UTC
The default is to sort strings stringwise, and numbers number-wise. The `+*` just forces number comparison. Perl 6 - the future is here, just unevenly distributed	[reply] [d/l]