Select Code to Download

$time{$previous} = {
                           'end_date' => $date,
                           'end_time' => $time
                            };

print "$_ $time{$_}{start_date} <br> \n" for (sort keys %time);