Your skill will accomplish what the force of many cannot |
|
PerlMonks |
Re^2: Fastest way to sort a list of integers into 0,1,2,3,-3,-2,-1by shmem (Chancellor) |
on Feb 06, 2019 at 03:15 UTC ( [id://1229448]=note: print w/replies, xml ) | Need Help?? |
Although that "push" line is quite interesting. perl++ The "push" line isn't the punchline. The punchline is how you calculate $low for the splice, which amounts to 7 iterations of the while loop for the sample data. Then, the array reordering is done with one fell swoop. Takes some time to grok that. tybalt89++
perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'
In Section
Seekers of Perl Wisdom
|
|