#!/usr/bin/perl

use strict;
use warnings;
use feature qw/say/;

my %hoh = (
    foo => { value => 'second', time => time},
    bar => { value => 'first', time => time},
    baz => { value => 'third', time => time},
);

for my $elem (sort {$a->{time} <=> $b->{time}} values %hoh) {
    say "value => " . $elem->{value};
}