note
I0
You probably meant <code>@temp = sort { $a->[0] <=> $b->[0] } @temp;</code><br>
<br>Although, given a @temp array, it benchmarks faster to do
<code>@temp = map { length $_ } @strings;
@sorted = @strings[sort{$temp[$a]<=>$temp[$b]} $[..$#temp];</code>
1394
1394