foreach my $result (sort { $a->[0] cmp $b->[0] } @results) {
my $file = shift @$result;
$$page_content .= "<tr><td class=\"file\">$file</td><td>";
foreach my $result (sort { $a->[0] cmp $b->[0] } @results) {
my $file = shift @$result;
$$page_content .= "<tr><td class=\"file\">$file</td><td>";