NAME

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

SYNOPSIS

#!/usr/bin/perl

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

$date='1969-05-11'; $x='date'; warn &UnixDate($$x, '%f');

print $Date::Horoscope::horoscope{$x}/;

DESCRIPTION

This module was written to help with the zodiac processing for a site I was contracting at. It returns either an all-lowercase zodiac based on a given date. 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 by <scalar>Date code into as RCS string for me.

AUTHOR

T.M. Brannon

SEE ALSO

perl(1).