for my $event (@events) {
  my $epoch = parse_event($event);

  my ( $MoonPhase, $MoonIllum, $MoonAge, $MoonDist, $MoonAng, $SunDist,
    $SunAng ) = phase($epoch);