[perl] Atualizando solsticio.