in reply to list of lists (LOL)

#2: my @sorted = sort {$a->[0] <=> $b->[0]} @{$lol};

In Section Seekers of Perl Wisdom