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

NAME

Date::Biorhythm - calculate biorhythms

SYNOPSIS

  use Date::Biorhythm

  Date::Biorhythm->birth (month => 5, day => 11, year => 1969); # my b'day!
  Date::Biorhythm->chart (month => 11, day => 23, year => 2001);
  Date::Biorhythm->chart (); # uses current time if no time given

  Birth Date:   19690511
  Chart Date:   20011123
  Difference:   11884 days

  you are at day 04 of 33 in your intellectual cycle
  you are at day 16 of 23 in your physical cycle
  you are at day 12 of 28 in your emotional cycle

DESCRIPTION

Biorhythms are the most general cycles that your body has. While other cycles are easy to measure empirically (ie, circadian rhythms, rate of cell replacement), biorhythms are more general. It's almost like the difference between neurobiology and psychology.

General Facts About Biorhythms

  • Most vulnerable times within a cycle

    According to Gittleson, are when one switches from negative phase to positive *or* vice versa. These are called critical days. He makes an analogy to the fact that a lightbulb is most likely to burn out when the light is switched from off to on or vice versa.

EXPORT

None by default.

AUTHOR

T. M. Brannon, <tbone@cpan.org>

REFERENCES