The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Date::Horoscope - Date operations based on the horoscope calendar

SYNOPSIS

#!/usr/bin/perl

use Date::Horoscope; use Date::Manip;

$date='1969-05-11';

$zodiac_sign_name = Date::Horoscope::locate($date); $zodiac_sign_posn = $Date::Horoscope::horoscope{Date::Horoscope::locate($date)}->{position},$/;

DESCRIPTION

This module was written to help with zodiac processing. It returns an all-lowercase zodiac sign name based on a given date parseable by Date::Manip. You can take this string and use it as a key to %horoscope to get a position in the zodiac cycle.

API

locate

Provide any date parseable by Date::Manip and it turns an all-lowercase zodiac name.

%horoscope

This hash contains the position, and start and end dates for a zodiac sign. The zodiac starts with Aries as far as I know. Some idiot didn't think taurus was number 1.

OTHER

I cannot say how tickled I am that RCS changes my <scalar>Date code into as RCS string for me.

AUTHOR

T.M. Brannon

Many thanks to Stephen McCamant for his detection of missing Pisces on Leap Year. Fixed now!

SEE ALSO

Date::Manip