Perl extension for the discordian calendar
use DateTime::Calendar::Discordian;
A module that implements the Discordian calendar made popular(?) in the \*(L"Illuminatus!\*(R" trilogy by Robert Shea and Robert Anton Wilson and by the Church of the SubGenius.
This document describes DateTime::Calendar::Discordian version 1.0
Seasons
Name Patron apostle ---- -------------- Chaos Hung Mung Discord Dr. Van Van Mojo Confusion Sri Syadasti Bureaucracy Zarathud The Aftermath The Elder Malaclypse
Each season contains 73 consecutively numbered days.
Holydays
Apostle Holydays Season Holydays ---------------- --------------- 1) Mungday 1) Chaoflux 2) Mojoday 2) Discoflux 3) Syaday 3) Confuflux 4) Zaraday 4) Bureflux 5) Maladay 5) Afflux
Apostle Holydays occur on the 5th day of the season.
Season Holydays occur on the 50th day of the deason.
St. Tib's Day occurs once every 4 years (1+4=5) and is inserted between the 59th and 60th days of the Season of Chaos.
The era of the Discordian Calendar is called Year Of Lady Discord (\s-1YOLD\s0.) Its' epoch (Confusion 1 of year 0) is equivalent to January 1, -1167 B.C.
X Day is when the Church of the SubGenius believes the alien X-ists will destroy the world. The revised date is equivalent to Confusion 40, 9827 \s-1YOLD\s0.
Days Of The Week
1. Sweetmorn 2. Boomtime 3. Pungenday 4. Prickle-Prickle 5. Setting Orange
The days of the week are named from the five Basic Elements: sweet, boom, pungent, prickle and orange.
Constructs a new DateTime::Calendar::Discordian object. This class method requires the parameters day, season, and year. If day is given as \*(L"St. Tib's Day\*(R" (or reasonable facsimile thereof,) then season is omitted. This function will \*(C`die\*(C' if invalid parameters are given. For example:
my $dtcd = DateTime::Calendar::Discordian->new(
day => 8, season => 'Discord', year => 3137, );
The second, nanosecond, and locale parameters are also accepted for compatability with DateTime but nothing is done with them.
Returns a copy of the object.
Returns the day of the season as a number between 1 and 73 or the string \*(L"St. Tib's Day\*(R".
Returns the name of the day of the week in abbreviated form or false if it is \*(L"St. Tib's Day\*(R".
Returns the full name of the day of the week or \*(L"St. Tib's Day\*(R" if it is that day.
Returns the number of days until X Day.
Builds a DateTime::Calendar::Discordian object from another DateTime object. This function takes an object parameter and optionally locale. For example:
my $dtcd = DateTime::Calendar::Discordian->from_object(
object => DateTime->new(day => 22, month => 3, year => 1971,));
If the current day is a holy day, returns the name of that day otherwise returns an empty string.
Returns the abbreviated name of the current season.
Returns the full name of the current season.
This function takes one or more parameters consisting of strings containing special specifiers. For each such string it will return a string formatted according to the specifiers, er, specified. See the strftime Specifiers section for a list of the available format specifiers. They have been chosen to be compatible with the ddate\|(1) program not necessarily the strftime\|(3) C function. If you give a format specifier that doesn't exist, then it is simply treated as text.
strftime Specifiers
The following specifiers are allowed in the format string given to the strftime method:
%a Abbreviated name of the day of the week (i.e., \s-1SM\s0.) Internally uses the day_abbr function.
%A Full name of the day of the week (i.e., Sweetmorn.) Internally uses the day_name function.
%b Abbreviated name of the season (i.e., Chs.) Internally uses the season_abbr function.
%B Full name of the season (i.e., Chaos.) Internally uses the season_name function.
%d Ordinal number of day in season (i.e., 23.) Internally uses the day function.
%e Cardinal number of day in season (i.e., 23rd.)
%H Name of current Holyday, if any. Internally uses the holyday function.
%n A newline character.
%N Magic code to prevent rest of format from being printed unless today is a Holyday.
%t A tab character.
%X Number of days remaining until X-Day. Internally uses the days_till_x function.
%Y Number of Year Of Lady Discord (\s-1YOLD\s0.) Internally uses the year function.
%{
%} Used to enclose the part of the string which is to be replaced with the words \*(L"St. Tib's Day\*(R" if the current day is St. Tib's Day.
%% A literal `%' character.
%. Try it and see.
Returns a three-element array containing the current \s-1UTC\s0 \s-1RD\s0 days, seconds, and nanoseconds. See DateTime for more details.
Returns the current year according to the \s-1YOLD\s0 (Year Of Lady Discord) era.
After installing, you can find documentation for this module with the perldoc command.
perldoc DateTime::Calendar::Discordian
Support for this module is provided via the [email protected] email list. See lists.perl.org <http://lists.perl.org/> for more details.
Please submit bugs to the \s-1CPAN\s0 \s-1RT\s0 system <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=datetime-Calendar-Discordian> or via email at [email protected].
You can also look for information at:
Search \s-1CPAN\s0. <http://search.cpan.org/dist/DateTime-Calendar-Discordian>
AnnoCPAN, annotated \s-1CPAN\s0 documentation. <http://annocpan.org/dist/DateTime-Calendar-Discordian>
\s-1CPAN\s0 Ratings. <http://cpanratings.perl.org/d/DateTime-Calendar-Discordian>
Jaldhar H. Vyas, <[email protected]>
Copyright (C) 2012, Consolidated Braincells Inc.
This distribution is free software; you can redistribute it and/or modify it under the terms of either:
a) the \s-1GNU\s0 General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version, or
b) the Artistic License version 2.0.
The full text of the license can be found in the \s-1LICENSE\s0 file included with this distribution.
The DateTime project web site. <http://datetime.perl.org/>
The Principia Discordia. <http://www.ology.org/principia/>
The Church of the SubGenius. <http://www.subgenius.com/>