On Sun, 22 Jun 2008, Flavio S. Glock wrote:

how about:

 use DateTime::Event::Lunar;
 use DateTime::Event::SolarTerm;
 my $new_moon = DateTime::Event::Lunar->new_moon();

 my $dt0  = DateTime->today;
 my $eq = DateTime::Event::SolarTerm->next_term_at(
   datetime  => $dt0,
   longitude => 0,
 );
 print $new_moon->next( $eq ), "\n";



Thanks, this is working great with my test data. Though DateTime::Event::Solarterm is failing a bunch of its tests with is a bit worrisome.

--
Jaldhar H. Vyas <[EMAIL PROTECTED]>

Reply via email to