foreach my $key (sort {$b <=> $a} keys %$sort_line_contents) {
	print join("\n", values %{$sort_line_contents->{$key}}), "\n";
}