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

##</code><code>##

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