Generate and manipulate html calendar months
use HTML::CalendarMonth;
# Using regular HTML::Element creation
my $c = HTML::CalendarMonth->new( month => 8, year => 2010 );
print $c->as_HTML;
# Full locale support via DateTime::Locale
my $c2 = HTML::CalendarMonth->new(
month => 8,
year => 2010,
locale => 'zu_ZA'
);
print $c2->as_HTML;
# Full locale support via DateTime::Locale
$c3 = HTML::CalendarMonth->new( month => 8, year => 79, locale => 'fr' );
print $c3->as_HTML
# HTML-Tree integration
my $tree = HTML::TreeBuilder->parse_file('cal.html');
$tree->find_by_attribute(class => 'hcm-calendar')->replace_with($c);
print $tree->as_HTML;
# clean up if you're not done, HTML::Element structures must be
# manually destroyed
$c->delete; $c2->delete;
HTML::CalendarMonth is a subclass of HTML::ElementTable. See HTML::ElementTable\|(3) for how that class works, for it affects this module on many levels. Like HTML::ElementTable, HTML::CalendarMonth is an enhanced HTML::Element with methods added to facilitate the manipulation of the calendar table elements as a whole.
The primary interaction with HTML::CalendarMonth is through items rather than cell coordinates like HTML::ElementTable uses. An item is merely a string that represents the content of the cell of interest within the calendar. For instance, the element representing the 14th day of the month would be returned by \*(C`$c->item(14)\*(C'. Similarly, the element representing the header for Monday would be returned by \*(C`$c- >item('Mo')\*(C'. If the year happened to by 2010, then \*(C`$c- >item(2010)\*(C' would return the cell representing the year. Since years and particular months change frequently, it is probably more useful to take advantage of the \*(C`month()\*(C' and \*(C`year()\*(C' methods, which return their respective values. The following is therefore the same as explicitly referencing the year: \*(C`$c->item($c- >year())\*(C'.
Multiple cells of the calendar can be manipulated as if they were a single element. For instance, \*(C`$c->item(15)->attr(class => 'fancyday')\*(C' would alter the class of the cell representing the 15th. By the same token, \*(C`$c->item(15, 16, 17, 23)->attr(class => 'fancyday')\*(C' would do the same thing for all cells containing the days passed to the \*(C`item()\*(C' method.
Underneath, the calendar is still nothing more than a table structure, the same as provided by the HTML::ElementTable class. In addition to the item based access methods above, calendar cells can still be accessed using row and column grid coordinates using the \*(C`cell()\*(C' method provided by the table class. All coordinate-based methods in the table class are accessible to the calendar class.
The module includes support for week-of-the-year numbering, arbitrary 1st day of the week definitions, and locale support.
Dates that are beyond the range of the built-in time functions of perl are handled either by the ncal/cal command, Date::Calc, DateTime, or Date::Manip. The presence of any one of these utilities and modules will suffice for these far flung date calculations. One of these utilities (with the exception of 'cal') is also required if you want to use week-of- year numbering.
Full locale support is offered via DateTime::Locale. For a full list of supported locale id's, look at HTML::CalendarMonth::Locale->locales().
All arguments appearing in [brackets] are optional, and do not represent anonymous array references.
With no arguments, the constructor will return a calendar object representing the current month with a default appearance. The initial configuration of the calendar is controlled by special attributes. Non- calendar related attributes are passed along to HTML::ElementTable. Any non-table related attributes left after that are passed to HTML::Element while constructing the <table> tag. See HTML::ElementTable if you are interested in attributes that can be passed along to that class. Special Attributes for HTML::CalendarMonth:
1-12, or Jan-Dec. Defaults to current month.
Four digit representation. Defaults to current year.
Specifies whether to display the month header. Default 1.
Specifies whether to display the year header. Default 1.
Specifies whether to display days of the week header. Default 1.
Specifies whether to display the week-of-year numbering. Default 0.
Specifies the id of the locale in which to render the calendar. Default is 'en_US'. By default, this will also control determine which day is considered to be the first day of the week. See HTML::CalendarMonth::Locale for more information. If for some reason you prefer to use different labels than those provided by \*(C`locale\*(C', see the \*(C`alias\*(C' attribute below.
Specifies whether or not to use full day names or their abbreviated names. Default is 0, use abbreviated names. Use -1 for 'narrow' mode, the shortest (not guaranteed to be unique) abbreviations.
Specifies whether or not to use full month names or their abbreviated names. Default is 1, use full names. Use -1 for 'narrow' mode, the shortest (not guaranteed to be unique) abbreviations.
Takes a hash reference mapping labels provided by \*(C`locale\*(C' to any custom label you prefer. Lookups, such as \*(C`day('Sun')\*(C', will still use the locale string, but when the calendar is rendered the aliased value will appear.
Specify first day of the week, which can be 1..7, starting with Sunday. In order to specify Monday, set this to 2, and so on. By default, this is determined based on the locale.
Set some handy \s-1CSS\s0 class attributes on elements, enabled by default. Currently the classes are: hcm-table Set on the <lt>table<gt> tag of the calendar hcm-day-head Set on the day-of-week <lt>tr<gt> or <lt>td<gt> tags hcm-year-head Set on the <lt>td<gt> tag for the year hcm-month-head Set on the <lt>td<gt> tag for the month hcm-week-head Set on the <lt>td<gt> tags for the week-of-year
Sets some additional \s-1CSS\s0 class attributes on elements, disabled by default. The notion of 'today' is taken either from the system clock (default) or from the 'today' parameter as provided to new(). Currently these classes are: hcm-today Set on the <lt>td<gt> tag for today, if present hcm-past Set on the <lt>td<gt> tags for prior days, if present hcm-future Set on the <lt>td<gt> tags for subsequent days, if present
Specify the value for 'today' if different from the local time as reported by the system clock (the default). If specified as two or less digits, it is assumed to be one of the days of the month in the current calendar. If more than two digits, it is assumed to be a epoch time in seconds. Otherwise it must be given as a string of the form 'YYYY-mm- dd'. Note that the default value as determined by the system clock uses localtime rather than gmtime.
This option is ignored for dates that do not exceed the range of the built- in perl time functions. For dates that do exceed these ranges, this option specifies the default calculation method. When set, if the 'ncal' or 'cal' command is available on your system, that will be used rather than the Date::Calc or Date::Manip modules. This can be an issue since the date modules blindly extrapolate the Gregorian calendar, whereas ncal/cal will revert to the Julian calendar during September 1752. If either ncal or cal are not available on your system, this attribute is meaningless. Defaults to 1.
The following methods return lists of item *symbols* (28, 29, 'Thu', ...) that are related in some way to the provided list of items. The returned symbols may then be used as arguments to the glob methods detailed further below.
Returns all item symbols in rows shared by the provided item symbols.
Returns all item symbols in columns shared by the provided item symbols.
Same as col_items(), but the returned item symbols are limited to those that are not header items (month, year, day-of-week).
Returns the row indices of rows containing the provided item symbols.
Returns the column indices of columns containing the provided item symbols.
Returns the day number (symbol) of the last day of the month.
Returns the column index for the first day of the month.
Returns a list of all days of the month as numbers.
Returns a list of week-of-year numbers for this month.
Returns a list of all day headers (Su..Sa)
Returns a list of all headers (month, year, dayheaders)
Returns a list of all item symbols (day number, header values) in the calendar.
Returns the index of the last column of the calendar (note that this could be the week-of-year column if head_week is enabled).
Returns the index of the last column of the calendar containing days of the month (same as last_col() unless week-of-year is enabled).
Returns the index of the first row of the calendar containing day items (ie, the first week).
Returns the index of the last row of the calendar.
Returns the day of month for 'today', if present in the current calendar.
Returns a list of days prior to 'today'. If 'today' is in a future month, all days are returned. If 'today' is in a past month, no days are returned.
Returns a list of days after 'today'. If 'today' is in a past month, all days are returned. If 'today' is in a future month, no days are returned.
Glob methods return references that are functionally equivalent to an individual calendar cell. Mostly, they provide item based analogues to the glob methods provided in HTML::ElementTable. In methods dealing with rows, columns, and boxes, the globs include empty calendar cells (which would otherwise need to be accessed through native HTML::ElementTable methods). The row and column numbers returned by the item methods above are compatible with the grid based methods in HTML::ElementTable.
For details on how these globs work, check out HTML::ElementTable and HTML::ElementGlob.
Returns all cells containing the provided item symbols.
Returns all cells in all rows occupied by the provided item symbols.
Same as item_row() except excludes week-of-year cells, if present.
Returns all cells in all columns occupied by the provided item symbols.
Same as item_col() except limits the cells to non header cells.
Returns all week-of-year cells, if present.
Returns all cells in the boxes defined by the item pairs provided.
Returns all header cells.
Returns all non header cells, including empty cells.
Returns all cells in the calendar, including empty cells.
The following methods provide ways of translating between various item symbols, coordinates, and other representations.
Returns the row and column coordinates of the provided item symbol, for use with the grid based methods in HTML::ElementTable.
Returns the item symbol of the item at the provided coordinates, for use with the item based methods of HTML::CalendarMonth.
Returns the name (item symbol) of the month number provided, where monthnum can be 1..12.
Returns the number (1..12) of the month name provided. Only a minimal case-insensitive match on the month name is necessary; the proper item symbol for the month will be determined from this match.
Returns the name (item symbol) of the day of week header for a number of a day of the week, where daynum is 1..7.
Returns the number of the day of the week given the symbolic name for that day (Su..Sa).
Returns the number in seconds since the epoch for a given day. The day must be present in the current calendar.
Returns a simple style sheet as a string that can be used in an \s-1HTML\s0 document in conjunction with the classes assigned to elements when css is enabled.
HTML::ElementTable
Date::Calc, DateTime, or Date::Manip (only if you want week-of- year numbering or non-contemporary dates on a system without the cal command)
Matthew P. Sisk, <[email protected]>
Copyright (c) 1998-2010 Matthew P. Sisk. All rights reserved. All wrongs revenged. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
A useful page of examples can be found at http://www.mojotoad.com/sisk/projects/HTML-CalendarMonth.
For information on iso639 standards for abbreviations for language names, see http://www.loc.gov/standards/iso639-2/englangn.html
HTML::ElementTable\|(3), HTML::Element\|(3), perl\|(1)