for my $dia (sort keys %HoH){
        print "<br>$dia: <br>";
        for my $horarios (sort keys %{$HoH {$dia}}){
                print "$horarios=>" . $HoH{$dia}->{$horarios} . "<br>";
        }
}

print "VALUE:<br>";
print ${"2023-01-01"}{"00:00"};  #I couldn't see the value