foreach $date ( sort keys %{ $data{$cat} }) {
                ^^^^ add