foreach my $key (reverse sort keys %titles) {
	#blah
}