http://qs321.pair.com?node_id=11148497


in reply to Re^2: Rosetta Code: Long List is Long -- dualvar
in thread Rosetta Code: Long List is Long

Interesting!

What really surprised me was how slow it became once I tried to sort the data just once:

sort { $b <=> $a || $a cmp $b } @data;
Before:
sort + output: 19 secs
After:
sort + output: 32 secs

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]